Hola:

Para eso tenes que relacionarlo con un archivo de disco, si lo que queres guardar son algunos pocos datos, podes usar un arhivo comun pero si la cantidad y diversidad de datos es mucha, entonces tendras que relacionarlo con una base de datos que tendras que crear antes.

Un manejo simple de archivos, en un comando que inicia el proceso podes poner:

(en este caso, utiliza el mismo formuario como pagina para mostrar los datos)



Private Sub Command1_Click()

Form1.Cls

i% = 0

r$ = InputBox(" Opcion")

If r$ <> "1" Then

GoTo lee:

End If





Open "C:\Tabla1.dat" For Output As #1

Do

Nombre$ = InputBox(" NOMBRE: ", "Ingreso de Datos") 'Lee datos desde el teclado.

Edad$ = InputBox(" EDAD: ", "Ingreso de Datos")

Otro$ = InputBox("Otrodato: ", "Ingreso de Datos")

Orden% = i%

Write #1, Orden%, Nombre$, Edad$, Otro$

r$ = InputBox(" Desea ingresar otros datos")

i% = i% + 1

Loop While UCase$(r$) = "S"

Close #1

lee: 'Mostrar el archivo en la pantalla.

Open "C:\Tabla1.dat" For Input As #1

Cls

Form1.Print "Datos en el archivo:": Print

Do While Not EOF(1)

Line Input #1, REC$ 'Leer datos del archivo(por linea).

Print REC$ 'Imprimir los datos en la pantalla.

Loop

Close #1

End Sub



Private Sub Command2_Click()

Form2.Show

End Sub



Para relacionarte con una base de datos, fijate en mis repuestas

https://answersrip.com/question/index?qid=20101211065827AARhjEg

o enviame un mensaje desde mi perfil, correo, con un e-mail donde enviarte un proyecto en VB6 para que veas como esta echo



Dios te bendiga

Saludos

Antonio

Asumo q no tienes mucho conocimiento de VB + Acces aqui va una forma mas sencilla de hacerla: todo va en el mismo formulario este es un ejemplo de una tabla de telefono l. a. BD se llama time table y l. a. tabla Telefonos es facil solo copialo en el mismo sort y cambia los datos que te convengan suerte espero haberte ayudado.. determination specific Public dbtelefono As Database Public tbtelefono As Recordset inner maximum Sub tablatelefono() 'va en una sola linea Set dbtelefono = Workspaces(0).OpenDatabase (App.direction & "BDAgenda.mdb") 'va en una sola linea Set tbtelefono = dbtelefono.OpenRecordset ("Telefonos", dbOpenTable) end Sub inner maximum Sub cmdagregar_Click() tablatelefono BeginTrans tbtelefono.MoveLast tbtelefono.AddNew tbtelefono("identity") = Val(lblnumero.Caption) tbtelefono("Nombre") = Txtnombre.text cloth tbtelefono("Apellido") = Txtapellido.text cloth tbtelefono("Telefono") = Txttelefono.text cloth tbtelefono("Direccion") = Txtdireccion.text cloth tbtelefono("Mail") = Txtmail.text cloth tbtelefono("Otros") = Txtotros.text cloth tbtelefono.replace If MsgBox("Desea Agregar el Registro", 4, "Grabar") = 6 Then CommitTrans MsgBox "Contacto Agregado con Exito" cmdnuevo.SetFocus Else Rollback end If end Sub

Existen varias formas de solucionar ese problema.



La ruta más larga creo que sería manejando un archivo.

Te sugiero investigues como funciona el OLEDB o ADO



Con el ADO puedes enlazar visual basic con un manejador de bases de datos (Casi cualquiera) y mandar a guardar, eliminar, acutalizar, buscar.



Ya que lo aprendas a usar y te marque errores podrás colocar directamente el error aqui en yahoo y así será mas facil ayudarte. Tu pregunta es muy general.



Suerte!