Visual Basic 6 - vb e word piccolo inghippo

Ciao a tutti.

Non riesco a fare il carattere ombreggiato...


Qualcuno sa la stringa ?!?!? grazie

Eh?

Dim MyWord As New Word.application
    With MyWord
        .Visible = True ' imposta false
        .Documents.Add
        .Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter
        .Selection.InlineShapes.AddPicture App.Path & "\Logo_ayy.jpg"
        .Selection.TypeText "" & vbCrLf & vbCrLf
        .Selection.ParagraphFormat.Alignment = wdAlignParagraphLeft
        .Selection.Font.Bold = wdToggle
        .Selection.Font.Size = 16
        .Selection.TypeText Text3.Text & "                                                                                         " & Date & vbCrLf & vbCrLf
        .Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter
        .Selection.Font.Bold = wdToggle
        .Selection.Font.Size = 26
        .Selection.TypeText "" & vbCrLf
        .Selection.Font.Underline = False
        .Selection.TypeText "COMMESSA " & Text2.Text & vbCrLf & vbCrLf & vbCrLf & vbCrLf
        .Selection.Font.Size = 65
        .Selection.Font.Emboss = True
        .Selection.TypeText ricorda & vbCrLf & vbCrLf
        .Selection.Font.Size = 65
        .Selection.TypeText Text1.Text & vbCrLf & vbCrLf

Cosi compilo un foglio word in varie parti, scelgo il carattere, lo centro, la grandezza, il sottolineato, il colore ecc.

Mi servirebbe fare una scritta obreggiata. So che si puo fare !!!