Visual Basic - Ayuda 3

Life is soft - evento anual de software empresarial
 
Vista:

Ayuda 3

Publicado por Hunter (13 intervenciones) el 31/12/2004 03:42:58
Quiciera Saber si este es el procedimiento correcto para mostrar el contenido de una lectura de un archivo externo:

Option Explicit
Public N, D, T, V1, V2, V3 As String
Private Sub Form_Load()
Open "texto.txt" For Input As #1 'Lectura de Variables
While EOF(1) ' Comprovación de fin de Archivo
Print #1, N, D, T ' Lectura de Variables
V1 = N: V2 = D: V3 = T 'Asignacion de Variables
Wend ' Fin del While
Close #1 ' Cerrando A
VA.Caption = V1: VB.Caption = V2: VC.Caption = V3 ' Presentacion de Variables
' VA, VB, VC Corresponden a las Etiquetas dentro del form1
End Sub
-----------
Cualquier ayuda es bienvenida
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Ayuda 3 Correccion al anterior

Publicado por Hunter (13 intervenciones) el 31/12/2004 05:31:55
Quiciera Saber si este es el procedimiento correcto para mostrar el contenido de una lectura de un archivo externo:

Option Explicit
Public N, D, T, V1, V2, V3 As String \' N,D,T Son las variables para el Archivo de texto y V1,V2,V3 Son para extraer el contenido de las variables N,D,T para luego pasarlas a: VA, VB, VC
Private Sub Form_Load()
Open \"texto.txt\" For Input As #1 \'Lectura de Variables
While EOF(1) \' Comprovación de fin de Archivo
Print #1, N, D, T \' Lectura de Variables
V1 = N: V2 = D: V3 = T \'Asignacion de Variables
Wend \' Fin del While
Close #1 \' Cerrando A
VA.Caption = V1: VB.Caption = V2: VC.Caption = V3 \' Presentacion de Variables
\' VA, VB, VC Corresponden a las Etiquetas dentro del form1
End Sub
-----------
Cualquier ayuda es bienvenida
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Ayuda 3 Correccion al anterior

Publicado por Marco Santis (265 intervenciones) el 31/12/2004 16:46:48
Creo que en vez de usar Print # debes usar el Input #

el Print # es para escribir en un archivo secuencial
el Input# es para leer de un archivo secuencial
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Ayuda 3 Correccion al anterior

Publicado por Hunter (13 intervenciones) el 31/12/2004 21:05:07
es correcto, fue un error muy basico :)
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar