change font styles when sending emails

[ashley1]

Hi

Below is my code to send emails
What i want to do is change font styles
Is it a possible to get strEmail2 bold?
also how would you get text to change font size/colour?

Dim rsEmail As DAO.Recordset
Dim strCustomerNo As String
Dim strCustomerName As String
Dim strEmail1 As String
Dim strEmail2 As String
Dim strEmail3 As String

strEmail1 = "Dear"
strEmail2 = "'Win a pair of tickets"
strEmail3 = "We are delighted to announce that we have a pair of VIP tickets"

Set rsEmail = CurrentDb.OpenRecordset("Email")
Do While Not rsEmail.EOF
strEmail = rsEmail.Fields("email address").Value
strCustomerNo = rsEmail.Fields("Customer Number").Value
strCustomerName = rsEmail.Fields("Customer Name").Value
DoCmd.SendObject , , , strEmail, , , "Win Tickets", "Ref:" & strCustomerNo & vbCrLf & vbCrLf & strEmail1 & " " & strCustomerName & vbCrLf & vbCrLf & strEmail2 & vbCrLf & vbCrLf & strEmail3, False
rsEmail.MoveNext

Loop
Set rsEmail = Nothing
MsgBox "Email(s) have been sent"

Thanks