[VB5] Copia da file a TextBox

[Mabi]

Puoi usare un ciclo di questo tipo:

Const NomeFile = "C:\File.txt"
Dim Cont As Integer
Dim StrTemp As String


Open NomeFile For Input As #1
  Do Until EOF(1)
    Line Input #1, StrTemp
    If Cont < Text1.Count Then
      Text1(Cont).Text = StrTemp
      Cont = Cont + 1
    End If
  Loop
Close #1