Minulla on tekstitiedostoon tallennettu suku ja etunimi puolipisteellä erotettuna toisistaan. Nyt tiedosto pitäisi selailuvaiheessa palauttaa eri riville sukuni ja etunimi. Miten saisin sen jaettu eri riveille?
Option Explicit
'Esitellään muuttuja ObjTextStream, joka on tyyppiä TextSream
Dim ObjTextStream As scripting.TextStream
Private Sub cmdSeuraava_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim rivi As String
'luetaan suku ja etunimi muuttujaan rivi
rivi = ObjTextStream.ReadLine
’Rivi sisältää sukunimen ja etunimen ja se pitäisi saada eri tiveille tulostettua
txtSuku = ObjTextStream.rivi
’ txtEtu =Tutustu tiedostonkäsittely-oppaaseen (https://www.ohjelmointiputka.net/oppaat/opas.
ja Split() -funktioon (https://www.ohjelmointiputka.net/hak/?kieli=Visual Basic&nimi=Split)
Split-funktiolla moinen tosiaan onnistuu (VB:n kuutosversiossa). Funktio jakaa merkkijonon taulukkoon tietyn merkin kohdalta, esimerkiksi:
Dim nimi As String, tiedot() As String nimi = "eka;toka" tiedot = Split(nimi, ";") MsgBox tiedot(0) 'eka MsgBox tiedot(1) 'toka
Aihe on jo aika vanha, joten et voi enää vastata siihen.