Visa signatur
Jahaja??
Har haft ett problem med mitt lilla visual basic program som jag inte har hittat något svar på ännu.
har sökt här på swec och googlat runt uta helsike...
vad ska jag skriva för att mitt lilla program ska kunna läsa in ord från en vanlig *.txt fil och sedan spara varje enstaka ord i en vektor
sä här ser textfilen ut som jag vill läsa från:
hej svej
tufft häftigt
runt snett
nix pix
farmor farfar
vill sedan "lägga in" varje ord i en och samma vektor.. "som sträng"
ex.
info(0, 0) = hej
info(0, 1) = svej
info(1, 0) = tufft
info(1, 1) = häftigt
info(2, 0) = runt
info(2, 1) = snett
info(3, 0) = nix
info(3, 1) = pix
info(4, 0) = farmor
info(4, 1) = farfar
tacksam för svar
Jahaja??
nånting sånt här kanske? (visual basic 6)
Private Sub Command1_Click()
Dim sLine As String
Dim sPair() As String
Dim i As Integer
Dim info(1000, 2) As String
Open "c:\test.txt" For Input As #1
Do Until EOF(1)
Input #1, sLine
sPair = Split(sLine, " ", 2)
info(i, 0) = sPair(0)
info(i, 1) = sPair(1)
i = i + 1
Loop
Close #1
End Sub
Copyright © 1999–2024 Geeks AB. Allt innehåll tillhör Geeks AB.
Citering är tillåten om källan anges.