Combo box me borra la BD
Publicado por fedex (4 intervenciones) el 27/04/2007 20:26:02
Me.AdoDistrito.Recordset.MoveFirst
Do While Not Me.AdoDistrito.Recordset.EOF
Me.cb_distrito.AddItem (Me.AdoDistrito.Recordset.Fields(0))
Me.AdoDistrito.Recordset.MoveNext
Loop
Do While Not Me.AdoDistrito.Recordset.EOF
Me.cb_distrito.AddItem (Me.AdoDistrito.Recordset.Fields(0))
Me.AdoDistrito.Recordset.MoveNext
Loop
Valora esta pregunta
0