Åbne fil med mit program?

Tags:    visual-basic

Hvis jeg går ind på min tekstfil og trykker "åben med..." og vælger mit eget tekstbehandligsprogram fra listen. Hvordan gør jeg så sådan så programmet faktisk åbner filen og viser den???

// Great programs often follow great brains!



1 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 2 karma
Sorter efter stemmer Sorter efter dato
Hvis jeg går ind på min tekstfil og trykker "åben med..." og vælger mit eget tekstbehandligsprogram fra listen. Hvordan gør jeg så sådan så programmet faktisk åbner filen og viser den???

// Great programs often follow great brains!


Prøv Denne kode:

Option Explicit

Private Sub Form_Load()
Dim indhold As String
Dim tmp As String
Open Command$ For Input As #1 'Command$ er de parametre der
Do While Not EOF(1) 'bliver givet til programmet når det starter!
Line Input #1, tmp
indhold = indhold + tmp + vbCrLf
Loop
Close
End Sub




t