[VB6] Caricamento stringa da file in textbox

[Jamester]

Buongiorno a tutti. Mi trovo davanti a un problema che non riesco a risolvere in nessun modo. Allora partiamo da questa istruzione:

Input #Numerofile, linea
Pacchetto.Text = Pacchetto.Text & linea

Qui in questo textbox, dovrebbe venir caricata la stringa tale "25 LUGLIO".

Ora visto che deve caricare altre linee da un file txt, al momento di caricare, mi mette solo 25 e penso LUGLIO nella riga successiva facendomi sballare l'ordine di caricamento delle righe successive.

Ora io suppongo che il VB6 riconosca male le stringhe che cominciano con un numero. C'è un modo per "fregare" il VB6 e farmi caricare come dovrebbe? Grazie!

[Jamester]

Cosi come sballa se metto punti e virgole in mezzo e ho dovuto disattivare l'immissioni di questi caratteri

[!fazz]

prova a postare il codice completo, così come hai scritto non si capisce molto

[Jamester]

If (Dir(App.Path & "\Squadra\Giocatore " & Indice & ".jmt") <> "") Then
Open App.Path & "\Squadra\Giocatore " & Indice & ".jmt" For Input As #Numerofile

Riga = 2
Do Until Riga = 59
Riga = Riga + 1

Input #Numerofile, linea
Pacchetto.Caption = Pacchetto.Caption & linea ' Tipo di Pacchetto
'Pacchetto.Caption = Replace(Pacchetto.Caption, "'", "")
Pacchetto.Caption = ""
Loop

Input #Numerofile, linea
Pacchetto.Caption = Pacchetto.Caption & linea ' Tipo di Pacchetto

Cmq credo di aver risolto in un modo ingegnoso: Salvando prima il valore cosi aggiungendo 2 apici a inizio e fine:

Print #1, "'" & Giocatore_Deluxe_2020.Note.Text & "'"

e poi caricandolo cosi

Giocatore_Deluxe_2020.Note.Text = Replace(Giocatore_Deluxe_2020.Note.Text, "'", "")

Se c'è un altro modo magari imparo anche quello :)

[lorenzo001]

Non usare la

Input ma la

Line Input

[Jamester]

Non usare la

Input ma la

Line Input

Quindi al posto di

Input #Numerofile, linea

questo

Line Input #Numerofile, linea

ho capito bene?