Keskustelu: Ohjelmointikysymykset: VB6: Tekstitiedosto Text1.Textii (vb)

Saiskos jotenkin ladattua tietyn tekstitiedoston Text1.Textiin ilman Common Dialogia?

Private Sub File1_DblClick()
Open File1.Path + "\" + File1.filename For Input As #1
While Not EOF(1)
Line Input #1, temp$
alltext$ = alltext$ & temp$ & vbCrLf
Wend
Form1.Text1.Text = alltext$
Close #1
Form2.Hide
End Sub

tarvitset file1.file objektin ja tiedosto ladataan klikkaamalla siellä file1.filessä sitä tekstitiedostoa kaksikertaa (tuplaklikkaus, doubleclick)

lainaus:

Saiskos jotenkin ladattua tietyn tekstitiedoston Text1.Textiin ilman Common Dialogia?

No tokihan sen tiedostonimen voi kovakoodatakin.

Open "c:\autoexec.bat" For Input As #1

Kannattaa muuten tutustua App-olion Path-ominaisuuteen, se tulee tässä usein tarpeeseen.