Ayuda de visual basic 6.0 por favor

Hola deseo saber como buscar con teclear una letra en un textbox y me busque en la base de datos por favor ayudarme

1 Respuesta

Respuesta
1
No eres muy claro amigo, pero suponiendo que tus datos están en Access, y que deseas que en un datagrid se vayan mostrando los datos similares al os caracteres que ingresas en tu textbox, algo así te serviría:
Dim cnn As ADODB.Connection
Dim rst As ADODB.Recordset
Dim sql As String
Set cnn = New ADODB.Connection
With cnn
.Provider = "microsoft.jet.oledb.4.0"
.ConnectionString = "data source=D:\Sistema_PS\Tablas_PS.mdb"
.Open
End With
Set rst = New ADODB.Recordset
sql = "select datos.Apellido, datos.Nombres from datos where datos.Apellido like '%" &
[Text1] & "%'"
With rst
.CursorLocation = adUseClient
.CursorType = adOpenKeyset
.LockType = adLockOptimistic
.Open sql, cnn, , , adCmdText
End With
Set DataGrid1.DataSource = rst
Set cnn = Nothing
Set rst = Nothing
Abraham
PD: Sobre tu otra pregunta, si creas tu instalador con la herramienta de "empaquetar y distribuir", he instalas tu ampliación en otra PC, no tendrás problema con ningún *.ocx. OJO, cuando creas un ejecutable (*.exe), no solo se debe copiar/pegar en otras PC's. Sino, instalar como menciono

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas