Visual Basic - Principiante con problemas

Life is soft - evento anual de software empresarial
 
Vista:

Principiante con problemas

Publicado por Juan Borio (17 intervenciones) el 17/04/2001 20:54:46

El problema es el siguiente:
Tengo un formulario con un control data este hace referencia a una tabla con varios
campos, al ser demasiados deseo que con un boton se habra otro formulario para mostrar
los campos restantes. Y aqui el problema no puedo referenciar los controles con el
data del formulario anterior.
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:Principiante con problemas

Publicado por Martin {^_^} (127 intervenciones) el 17/04/2001 21:19:28
la primera recomendacion es que te olvides del control data y trabajes a puro codigo, eso te evitará problemas...

por ejemplo, digamos que tengo una tabla con muchos campos los cuales quiero mostrar unos enun formulario y otros en otro formulario...

en el load del primer formulario abrimos la base:

Private Sub Form_Load()
Set basededatos = Workspaces(0).OpenDatabase(App.Path & "\HOJA.mdb")

'indicamos con cual tabla vamos a trabajar:
' con "Dim edicion As Recordset" estas creando un objeto record set,indispensable para el manejo de tu tabla, ya que éste representa a todos los registros de tu tabla.

Dim edicion As Recordset
Set edicion = basededatos.OpenRecordset("NOMBRE DE LA TABLA", dbOpenDynaset)

'vamos a suponer que tu tabla tiene 4 campos.
'y en este formulario solo vas a poner dos.
' los cuales vas a meter en un list box.

do until edicion.eof
list1.additem edicion("CAMPO1") & edicion("CAMPO2")
loop

'el codigo anterior dice:
hacer hasta que la tabla "NOMBRE DE LA TABLA" representada por el objeto "edicion" llegue a su fin.
'¿y qué es lo que va a hacer?

'pues va a añadir en el listbox lo que encuentre en el primer registro en el campo1 y el campo2,
luego lo que encuentre en el segundo registro en el campo1 y el campo2 y asi hasta que la tabla se termine..

'bueno, y ahora como pasamos al otro formulario?
'pues despues de la instruccion loop:
'pones:

form2.show vbmodal

end sub

en el cual vas a repetir las mismas instrucciones que en el primer form
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