recorrer datos
Publicado por maria (39 intervenciones) el 20/04/2009 19:08:09
hola, estoy intentado seguir el código que me has recomendado y resulta que lo que hago es hacer una clase pero al poner la parte que te indico a continuación el el form donde están lo botones me da un error
Protected Sub Form_Load(...)
Tabla = New Collection(Of Registro)
CargarTabla()
Mostrar(0)
end sub
Private Sub Mostrar(ByVal pCual as Integer)
'asumo que son textbox donde van los datos.
'pCual es el índice o registro que vas a mostrar, cuando inicias, es el registro 0
txtId.Text = Tabla(pCual).Id
txtNombre.Text = Tabla(pCual).Nombre
...
'y así para todos
_Cual = pCual
end sub
te agradezco mucho tu ayuda
Protected Sub Form_Load(...)
Tabla = New Collection(Of Registro)
CargarTabla()
Mostrar(0)
end sub
Private Sub Mostrar(ByVal pCual as Integer)
'asumo que son textbox donde van los datos.
'pCual es el índice o registro que vas a mostrar, cuando inicias, es el registro 0
txtId.Text = Tabla(pCual).Id
txtNombre.Text = Tabla(pCual).Nombre
...
'y así para todos
_Cual = pCual
end sub
te agradezco mucho tu ayuda
Valora esta pregunta


0