Olen yrittänyt tallentaa listboxin tiedostoon, mutta tiedosto jää vain tyhjäksi. Mikä mättää?
Koodi:
Dim i As Integer, r As String Open App.Path & "\suosikit.txt" For Output As #9 For i = 1 To 1 Print #9, List1 Next Close #9 ''SULJETAAN TIEDOSTO Unload Me
Ilmeisesti yrität tallentaa listboksin, etkä sen sisältöä. Listan voit tallentaa tähän tapaan:
Dim i As Integer Open "tiedosto.txt" For Output As #1 For i = 0 To List1.ListCount-1 Print #1, List1.List(i) Next i Close #1
Ps. voisit käyttää koodi tageja.. tsot tsot..
Kiitos toimii!
Aihe on jo aika vanha, joten et voi enää vastata siihen.