25/05/2008, 02:34
|
| Colaborador | | Fecha de Ingreso: enero-2008 Ubicación: Unas veces aquí, otras veces allí
Mensajes: 1.482
Antigüedad: 17 años, 2 meses Puntos: 37 | |
| Respuesta: Interpretar numeros
Hola,
prueba así:
Código:
Private Sub Command1_Click()
Dim sLinea As String
Open "C:\Archivo.txt" For Input As #1
Do While Not EOF(1)
Line Input #1, sLinea
Text1 = Text1 & sLinea & vbNewLine
Loop
Close #1
End Sub
 |