Visual Basic - Guardar datos de textbox

Life is soft - evento anual de software empresarial
 
Vista:

Guardar datos de textbox

Publicado por Jaime (1 intervención) el 06/05/2009 19:08:13
Quisiera saber si existe una forma en visual basic 6.0 de poder guadar los datos introducidos en un textbox.. y que al volver a correr el proyecto o programa, no desaparezcan.

por ejemplo si tengo una serie de textbox con los precios de productos ya definidos, pero en algun momento deseo cambiar esos precios y que se guarden esos cambios, sin que desaparezcan al volver a correr el programa. ¿me explico?
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

Sí existe, claro

Publicado por Quique (51 intervenciones) el 06/05/2009 19:45:58
Pues tienes varias opciones:
Guardarlos en una tabla de alguna base de datos.
Grabarlos en un archivo de tipo Texto Binario o Random.
Grabarlos en un archivo de configuración (del tipo .INI).
Grabar los datos en el registro de Windows (usando la instrucción SaveSetting, o alguna API para tal fin).
Y con cualquiera de ellas podrás recuperarlos a tus TextBoxes, pero depende del método que elijas (y sepas usar).
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

Faltó una coma

Publicado por Quique (51 intervenciones) el 06/05/2009 19:51:07
En esta línea:
"Grabarlos en un archivo de tipo Texto Binario o Random."
debía ser:
"Grabarlos en un archivo de tipo Texto, Binario o Random."
para que nadie vaya a preguntar "¿Cuál es el tipo de archivo Texto Binario?"
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 FRANCISCO

RE:Guardar datos de textbox

Publicado por FRANCISCO (52 intervenciones) el 07/05/2009 12:23:52
Option Explicit
Dim texto As String
Dim numerofile As Integer
Dim longitud As Integer
'GREA DOS COMMANDBUTTON LEER Y GUARDAR Y UN TEXTBOX CON SCROSBAR-VERTICAL Y MULTILINEA
'ESCRIBE EL TEXTO EN TEXT1 Y GUARDALO
' CIERRA EL PROGRAMA LO ABRES Y LE DAS AL BOTON LEER
'PRUEBA HABER SI FUNCIONA

Private Sub Command1_Click()
texto = Text1.Text
numerofile = FreeFile
Open "carpeta" For Output As numerofile
Print #numerofile, texto
Close numerofile
End Sub

Private Sub Command2_Click()
'GUARDA EL PROYECTO LUEGO LO ABRES Y LO CARGAS PARA
'QUE SE "CARPETA" SE GUARDE EN EL DIRECCTORIO DEL PROGRAMA
'O CAMBIAS EL DIRECTORIO DE LA CARPETA
numerofile = FreeFile
Open "carpeta" For Input As numerofile
longitud = LOF(numerofile)
texto = Input$(longitud, numerofile)
Text1.Text = texto & vbCrLf
Close numerofile
End Sub
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