'Detta tar emot och visar parametern om du skriver tex
'(Minapp.exe Hejsan) och dos-prompten
Private Sub Form_Load()
Dim strPar as String
strPar = Command
MsgBox strPar ' Skriver ut (Hejsan)
End sub
'Eller om du dubbelklickar på hej.txt (Om den är
'associerad till ditt program
Private Sub Form_Load()
Dim strPar as String
strPar = Command
rtfText.LoadFile strPar, rtfText 'Laddar in filen Hej.txt
' till rtfText
End sub