20/10/08 13:50
danyjeey
Salve raga...volevo una delucidazione. Avendo un file con 4 righe di testo..vorrei che ogni riga venga visualizzata in 4 textbox differenti
es.
file.txt
1
2
3
4
1 nella textbox1..2 nella textbox2..e cosi via!
Vi prego aiutatemi. Ci sto perdendo la testa x questo fatto. E non so proprio come fare!
aaa
20/10/08 14:53
P4p3r0g4
hm, a me sembra molto semplice.
cos'e` che non riesci a fare esattamente?
a leggere il file?
a mettere i dati in textbox differenti?
else?
aaa
20/10/08 19:26
Roberto VB
Io farei una cosa del genere:
Dim Testo As String
Dim a() As String
Dim i As Integer
Open file For Random As #1
Get #1, 1, Testo
a = Split(Testo, ":")
For i = LBound(a) To UBound(a)
Text1.text = a(1)
Text2.text = a(2)
Text3.text = a(3)
Next
Close #1
Nel file ogni riga separala magari con ":" così ti esce più facile.
Questa è l'unica soluzione che conosco, se qualcuno ne sa una più breve aspetto risposta pure io
Ultima modifica effettuata da Roberto VB 20/10/08 19:27
aaa
20/10/08 20:59
danyjeey
Ultima modifica effettuata da danyjeey 20/10/08 20:59
aaa
20/10/08 21:06
TheLizard
Si potrebbe anche usare la funzione Split..
aaa
20/10/08 21:24
P4p3r0g4
io la avrei impostata in modo completamente diverso.
il vb e` bello perche` e` vario.
(niente discussioni su e` vero o non e` vero. accettatelo come assioma imposto dall'onnippotente (io))
tornando al discorso.
non ho quotato il tuo sorgente pero mi era parso di capire che avevi salvato tutti i caratteri in un array e diviso lo stesso con split.
poi avevi un fatto un ciclo con ubound e lbound e scrivere i risultati, no?
edit : ci ho riguardato. hai sbagliato lo split. devi impostarlo su chr(10) o chr(13) perche il testo e` diviso da accapo e non da :
edit2 : hehe, hai messo un ciclo per poi non utilizzarlo. cosi come hai scritto, metti 4 volte il contenuto di a(1) in text1 ecc..
Ultima modifica effettuata da P4p3r0g4 20/10/08 21:28
aaa