01/12/2006, 15:15
|
 | | | Fecha de Ingreso: noviembre-2005 Ubicación: Buscame...
Mensajes: 1.051
Antigüedad: 19 años, 5 meses Puntos: 11 | |
| No importa, ya solucione mi problema, puse un Comon dialog y en el command buton puse este codigo:
Dim largo As Long
Dim texto As String
Open "c:\archivo.txt" For Input As #1
largo = FileLen("c:\archivo.txt")
texto = Input(largo, #1)
Close #1
Text2.Text = texto
El que lo quiera, ahi lo tiene.
__________________
You're face to face, with the man who sold the world - NIRVANA
Diese stadt ist eine Dirne, hat rote flecken auf der Stirn - RAMMSTEIN |