[VB6] Allineamento testo a destra in word

[superesse]

ciao ragazzi ho un problema , creo un file di word e inserisco del testo , il problema e che non so come si fa da codice ad allinearlo a destra , sapete aiutarmi?

Option Explicit
Dim wrdApp As Word.Application
Private Sub Command1_Click()
Set wrdApp = New Word.Application
With wrdApp
'Show Word
.Visible = True
'Create New Document
.Documents.Add
'Add text to the document

.ActiveDocument.Content.Text = "Hi"
.ActiveDocument.Content.Text = "This is a test example"

'************************************************* *************
'Il testo deve andate tutto a destra **************************
'************************************************* *************
End With
End Sub
Private Sub Command2_Click()
'Close the current document
wrdApp.ActiveDocument.Close
'Close Word
wrdApp.Quit
End Sub

Private Sub Form_Unload(Cancel As Integer)
'Clear the memory
Set wrdApp = Nothing
End Sub

[xegallo]

scrivere linguaggio e versione anche nel titolo

[Boldan]

Prova così:

wrdApp.ActiveDocument.Content.ParagraphFormat.Alignment = wdAlignParagraphRight

Fammi sapere se funziona


Ciao