¿Cómo recorrer una cadena en una base de datos usando vb y agregarla a un cuadro de lista desplegable?
Si utilizas el
método Data1.Recordset.FindFirst
o el
método Data1.Recordset.FindNext
Para buscar registros, utilice
Data1.Recordset.NoMatch
para determinar si se encuentran registros coincidentes si
Data1.Recordset.NoMatch regresa. Verdadero significa que no se encontró y devolver Falso significa que se encontró.
No se puede utilizar directamente (preferiblemente no directamente) como lo hace usted:
Data1.Recordset.FindNext "Field 2 Like" amp "'*" amp Text8.Text amp; ; "*'"
Combo1.AddItem Data1.Recordset.Fields(1)
En su lugar, haga esto:
Data1.Recordset.FindNext "Campo 2 Like" amp; "'*" amp; Text8.Text amp; "*'"
if Data1.Recordset.NoMatch Then
'Escribe aquí el código correspondiente para finalizar la búsqueda
else
Combo1.AddItem Data1.Recordset.Fields(1)
.........
Fin Si
Lo que dije anteriormente es mejor no usarlo directamente como usted, significa que aún se puede usar directamente en algunos lugares. Es decir, ¿está seguro de que el registro que está buscando debe existir? ?