Visual Basic - Asignar variable a Textbox

Life is soft - evento anual de software empresarial
   
Vista:

Asignar variable a Textbox

Publicado por KIKE (43 intervenciones) el 20/01/2013 06:34:57
Hola amigos.
Tengo el siguiente codigo para contar las lineas de un texto. Mi problema es que el texto que quiero abrir es el que esta en otro TextBox del formulario, y que anteriormente he introducido.
Es por lo que al cargar el formulario asigno lo que hay en ese box a la variable PGMenTEXT14. Es esa variable la que pongo al final del arbol de lectura de fichero.

Dim PGMenTEXT14 As String
Dim Linea As String
Dim CantidadDeLineas As Long

Private Sub Command1_Click()
Open "C:\Documents and Settings\usuario\Escritorio\CADENAS\PGMenTEXT14" For Input As 1
Do While Not EOF(1)
Line Input #1, Linea
CantidadDeLineas = CantidadDeLineas + 1
Loop
Close #1
Text1.Text = CantidadDeLineas
Text2.Text = Linea
End Sub

Private Sub Form_Load()
PGMenTEXT14 = Text14.Text
Text1.Text = ""
Text2.Text = ""
End Sub


Al hacerlo correr me sale ERROR "No se ha encontrado el archivo".

Me podeis ayudar?? Es urgente. GRACIAS a todos.
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

Asignar variable a Textbox

Publicado por jcmg (518 intervenciones) el 21/01/2013 06:14:08
esta linea posiblemente es el problema:
Open "C:\Documents and Settings\usuario\Escritorio\CADENAS\PGMenTEXT14" For Input As 1

lo que estas cargando es la variable PGMenTEXT14 no el fichero logicamente no lo encuentra
ahi va el nombre del fichero no la variable
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

Asignar variable a Textbox

Publicado por Rodolfo (4 intervenciones) el 25/01/2013 03:32:07
Pienso lo mismo . VB 6 esta mas vivo que nunca.
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