[VB6] Fare "dialogare" due applicazioni

[Zitrog]

Ho provato cosi...ma funziona solo a volte...non capisco perchè?

Cioè mi attiva sempre il doc.txt ma la stringa la scrive solo a volte

Private Sub Command1_Click()
    AppActivate "Nuovo Documento di testo (2).txt"
    SendKeys "Ciao Mondo!!!"
End Sub