¿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" & "'*" & Text8.Text & "* '"
Combo1.AddItem Data1.Recordset.Fields(1)
En su lugar, haz esto:
Data1.Recordset.FindNext "Me gusta del campo 2" & "'*" & Text8.Text & "*'"
if Data1.Recordset.NoMatch Then
'Escribe aquí el código correspondiente para finalizar la búsqueda
else
Combo1.AddItem Data1.Recordset.Fields(1)
.........
Finalizar si
Lo que dije anteriormente es mejor no usarlo directamente como usted. Significa que todavía se puede usar directamente en algunos lugares. Es decir, ¿está seguro de que el registro que está buscando debe existir?