Email code. How to format specific lines in bold.

Hi there,

I have a code that when clicking on a CommandButon, a new email is created.

I need one of the lines in Bold.

The code I am using is the following:

Private Sub CommandButton3_Click()
Dim OutApp As Object
    Dim OutMail As Object
    Dim strbody As String

    Set OutApp = CreateObject("Outlook.Application")
    Set OutMail = OutApp.CreateItem(0)

    strbody = "Dear Customer." & vbNewLine & vbNewLine & _
              "Your evaluation of the XXXX Service Name Delivery is very important to us." & vbNewLine & vbNewLine & _
              "This survey will help us gauge how important the customer deems this engagement to be." & vbNewLine & vbNewLine & _
              "We would like to thank you in advance for participating in our survey and kindly ask you to submit the online questionnaire via below." & vbNewLine & vbNewLine & _
              ' NEED THE BELOW TEXT IN BOLD
              "*******LinkHere*******" & vbNewLine & vbNewLine & _
              "Many thanks in advance and kind regards,"
       
    On Error Resume Next
    With OutMail
        .To = ""
        .CC = ""
        .BCC = ""
        .Subject = "****** Service Evaluation"
        .Body = strbody
        .Display
        
    End With
    On Error GoTo 0

    Set OutMail = Nothing
    Set OutApp = Nothing

    Unload Me
    
End Sub

I have tried the code <b> but the same does not work.

Anyone knows a code that format the above mentioned text?

Your assistance will be higly appreciated.

Many thanks in advance and kind regards,
Filipe