¿Como puedo leer el texto de un archivo e introducirlo en un TextBox?
Private Sub CmdAbrir_Click()
Dim Canal As Integer
Canal = FreeFile 'Buscando un canal libre
'Abriendo el archivo --> "Input"
Open "c:\Archivo.txt" For Input As Canal
'Pasando los datos al TexBox
Text1.Text = Input$(LOF(Canal), #Canal)
Close Canal 'Cerrando el archivo
End Sub
¡S4lu2!