Visual Basic - Guardar varios textbox en un txt y al abrir el formulario mostrarlos

Life is soft - evento anual de software empresarial
   
Vista:

Guardar varios textbox en un txt y al abrir el formulario mostrarlos

Publicado por cHukAs (8 intervenciones) el 07/11/2017 15:05:41
Hola, estoy empezando con visual basic 6 y estoy haciendo mis pinitos pero tengo una duda que no se resolver.
Estoy haciendo una especie de juego con 100 casillas con la foto de un personaje con un textbox debajo de la foto para escribir su nombre.
Al acertar el nombre del personaje el textbox se bloquea para no poder escribir otra cosa y el dato se almacena en un archivo. Hasta ahi bien, pero cuando cierro el formulario y lo vuelvo a abrir quiero que los datos que introduje correctamente esten cada uno en su textbox, es decir, supongamos que escribi 40 respuestas correctas y cierro el formulario. Al volverlo a abrir quiero que las respuestas correctas que escribie en esos 40 textbox esten escritas y solo queden disponibles los textbox donde todavía no escribi nada.
Se como leer un archivo con la opcion open "archivo" for input pero no se como hacer para colocar cada dato almacenado correctamente en el textbox que le corresponde. Espero haberme explicado bien.
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
Imágen de perfil de Antoni Masana

Guardar varios textbox en un txt y al abrir el formulario mostrarlos

Publicado por Antoni Masana (282 intervenciones) el 08/11/2017 07:55:12
Seria algo asi:

1
2
3
4
5
6
7
8
Dim Fichero as String
Fichero="C:\GAME\Respuesta.txt"
Open Fichero for Output As #1
Print #1, TextBox1.Text
Print #1, TextBox2.Text
Print #1, TextBox3.Text
Print #1, TextBox4.Text
Close #1

Saludos.
\\//_
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

Guardar varios textbox en un txt y al abrir el formulario mostrarlos

Publicado por cHukAs (8 intervenciones) el 08/11/2017 11:27:23
Eso es para guardar y como ya he dicho el problema no lo tengo al guardar los datos.
Lo que quiero es que al abrir el formulario esos datos guardados estén cada uno en el textbox que le corresponde.
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
Imágen de perfil de Antoni Masana

Guardar varios textbox en un txt y al abrir el formulario mostrarlos

Publicado por Antoni Masana (282 intervenciones) el 09/11/2017 06:52:28
Lo siento lo entendí al revés:

1
2
3
4
5
6
7
8
Dim Fichero as String
Fichero="C:\GAME\Respuesta.txt"
Open Fichero for Input As #1
Line Input #1, TextBox1.Text 
Line Input #1, TextBox2.Text
Line Input #1, TextBox3.Text
Line Input #1, TextBox4.Text
Close #1

Saludos.
\\//_
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

Guardar varios textbox en un txt y al abrir el formulario mostrarlos

Publicado por cHukAs (8 intervenciones) el 09/11/2017 13:52:52
Eso no funciona compañero, de esa manera lo unico que guarda en el txt es lo que hay en el ultimo textbox. En todo caso lo que habria que hacer es poner append en vez de input para que añada los datos en vez de reemplazarlos. Pero aun asi no se cargar los datos.
Digamos que en mi archivo txt hay los siguientes valores:
moto
coche
patinete
camion
barco
avion

Lo que yo quiero hacer es que al abrir el formulario moto aparezca en el textbox donde yo lo escribi para guardarlo, es decir, que si yo escribi moto en el textbox 1 aparezca ahi. Si coche lo escribí en el textbox 5 que aparezca en el 5 al abrirlo.
Se puede hacer esto que pido? estoy empezando a pensar que no.
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

Guardar varios textbox en un txt y al abrir el formulario mostrarlos

Publicado por Yamil Bracho (207 intervenciones) el 09/11/2017 17:51:22
Agregale cuando guardes el dato, el numero del textbox donde se leyo. Por ejemplo

1
2
3
4
5
6
7
Print #1, ("1" & "," & TextBox1.Text)
 
Print #1,  ("2" & "," & TextBox2.Text)
 
Print #1,  ("3" & "," & TextBox3.Text)
 
Print #1,  ("4" & "," & TextBox4.Text)

Para leerlo haces el LineInput

1
2
3
4
5
6
7
8
9
10
Dim Linea As String
Line Input #1,Linea
Dim tokenArray As String = Split(Linea)
int num = Cint(tokenArray(0))
Select case num
  case 1
     TextBox1.Text = tokenArray[1]
  case 2
     TextBox1.Text = tokenArray[2]
...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

Guardar varios textbox en un txt y al abrir el formulario mostrarlos

Publicado por cHukAs (8 intervenciones) el 09/11/2017 22:32:00
Esooooo es justo lo que necesitaba.
La parte de leer los datos la coloco en el load del formulario para que nada mas abrirlo ya coloque los datos en el textbox correspondiente pero me da error de compilacion/sintaxis en la linea
Dim tokenArray As String = Split(Linea)
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
Imágen de perfil de Andres Leonardo

Guardar varios textbox en un txt y al abrir el formulario mostrarlos

Publicado por Andres Leonardo (1164 intervenciones) el 09/11/2017 23:11:39
en mi respuesta lo tengo en un boton solo debes colocarlo en un LOAD

saludos
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
Imágen de perfil de Andres Leonardo

Guardar varios textbox en un txt y al abrir el formulario mostrarlos

Publicado por Andres Leonardo (1164 intervenciones) el 09/11/2017 17:56:49
Me parece que esto te ayuda ...te adjunto el proyecto donde hice que funcionara
.

Ahora deberas solo poner los dos botones dentro de tu prouecto se te hara sencillo.

Ecribe lo que queiras en los textboxes y da guardar .... eso se almacenar en un archivo texto

cuando das leer lee linea a linea y coloca en el control correspondiente los datos.... esto te sirve para todos los textboxes que tengas en el formulario sean 3 5 o n


SAludos


[/code]
1
2
3
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
Imágen de perfil de Antoni Masana

Guardar varios textbox en un txt y al abrir el formulario mostrarlos

Publicado por Antoni Masana (282 intervenciones) el 09/11/2017 18:27:22
No se exactamente que es lo que quieres hacer, no lo acabo de entender.

Pero te explico un poco como funciona basicamente la idea: Antes de cerrar el formulario ejecutas esto:

1
2
3
4
5
6
7
8
9
10
11
Dim Fichero as String
Fichero="C:\GAME\Respuesta.txt"
 
Open Fichero for Output As #1
    Print #1, TextBox1.Text
    Print #1, TextBox2.Text
    Print #1, TextBox3.Text
    Print #1, TextBox4.Text
    Print #1, TextBox5.Text
    Print #1, TextBox6.Text
Close #1

El el fichero tendrás esto que es lo que había en cada uno de los TextBox:

1
2
3
4
5
6
moto
coche
patinete
camion
barco
avion

Y cuando vuelves a abrir el formulario ejecutas esto:

1
2
3
4
5
6
7
8
9
10
11
Dim Fichero as String
 
Fichero="C:\GAME\Respuesta.txt"
Open Fichero for Input As #1
    Line Input #1, TextBox1.Text 
    Line Input #1, TextBox2.Text
    Line Input #1, TextBox3.Text
    Line Input #1, TextBox4.Text
    Line Input #1, TextBox5.Text
    Line Input #1, TextBox6.Text
Close #1

Tendrás el los 6 TextBox el mismo texto que tenias al cerrar el anterior, es así de simple. Esto hay muchas formas de hacerlo, algunos programas usan un fichero con extensión INI otros en el registro del sistema y otros ni se sabe.

Si tu escribiste moto en el TextBox1 volvera a estar en el TextBox1

La idea básica es la misma y todos los programas que puedes configurar lo hacen y consiste en guardar en un fichero todos los datos que pueden ser variables como por ejemplo la posición de la ventana y el tamaño, color, contenido de TextBox, etc.

Te voy a contar un caso practico un programa de caja para cobrar en una tienda o un supermercado:

¿Que pasa si el cliente viene con un carro lleno y cuando quedan dos productos por registrar en la caja hay un breve corte eléctrico?
¿Tenemos que volver a pasar toda la compra?

NO, porque el programa ha ido guardando en un fichero los datos registrados para que al volver a arrancar estuviese como si aquí no hubiese pasado nada.

Y eso ¿Cómo se hace? eso depende de cada programa y cada programador pero basicamente es lo que te he explicado.

Saludos.
\\//_
||*||
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

Guardar varios textbox en un txt y al abrir el formulario mostrarlos

Publicado por cHukAs (8 intervenciones) el 10/11/2017 15:54:20
Vale, ahora ya consigo guardarlo todo bien como me has dicho pero el codigo para leerlo me da este error:
https://image.ibb.co/gdptOG/Sin_t_tulo.png
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
Imágen de perfil de Antoni Masana

Guardar varios textbox en un txt y al abrir el formulario mostrarlos

Publicado por Antoni Masana (282 intervenciones) el 10/11/2017 19:38:47
¿Que es Text1?
¿Es un objeto TextBox?
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

Guardar varios textbox en un txt y al abrir el formulario mostrarlos

Publicado por cHukAs (8 intervenciones) el 10/11/2017 19:49:10
Si eso es. Tengo 100 textbox llamados text1, text2, text3.... es el nombre por defecto.
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
Imágen de perfil de Andres Leonardo

Guardar varios textbox en un txt y al abrir el formulario mostrarlos

Publicado por Andres Leonardo (1164 intervenciones) el 10/11/2017 21:05:03
disculpa que te lo diga .. con mi codigo ni siquiera revisa el nombre del componente ponle el que quieras y lo recupera... le pones por defecto o el que quieras igual funciona,.. en todo caso la vedad y puedes tener 50 75 100 1000 los recorrera todos para guardar y los recuperara todos para leer...

Saludos
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

Guardar varios textbox en un txt y al abrir el formulario mostrarlos

Publicado por cHukAs (8 intervenciones) el 10/11/2017 23:33:12
Pero no me has puesto ningún código, sólo veo 3 capturas de pantalla.
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

Guardar varios textbox en un txt y al abrir el formulario mostrarlos

Publicado por cHukAs (8 intervenciones) el 11/11/2017 00:53:46
Disculpa no había visto el archivo .zip con el programa. Lo he probado y guarda bien pero al leer me da error en la linea:
C = Mid(Linea, 1, S - 1)
No he tocado nada lo he probado tal cual lo has hecho tu.
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
Imágen de perfil de Andres Leonardo

Guardar varios textbox en un txt y al abrir el formulario mostrarlos

Publicado por Andres Leonardo (1164 intervenciones) el 13/11/2017 17:45:10
te adjunto la version con un pequeño cambio.
creale otro textbox y pruebalo
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
Revisar política de publicidad