| |||
Respuesta: Comparar caja contra base de datos Cita: Lo puedes hacer en el evento TextChanged; en este ejemplo, mediante la referencia a ADO y espacio de nombres System.Data.OleDb, según se va tecleando en el TextBox, muestra las coincidencias de la tabla "Pedidos" en un control DataGridView:
Código:
Nota: "oCon" es la conexion ADODB a la base de datos que ya está abierta.Private Sub TextBox1_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged Dim sTable As String = "Pedidos" Dim sql As String = "Select * From " & sTable & " WHERE Proveedor LIKE '" & TextBox1.Text & "%'" rs.Open(Sql, oCon, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockOptimistic) Dim oDa As OleDbDataAdapter = New OleDbDataAdapter Dim oDs As New DataSet oDa.Fill(oDs, rs, sTable) DataGridView1.DataSource = oDs.Tables(0) End Sub ![]() |