Hola, Tengo una pregunta. Resulta que estoy desarrollando un software con Vb6.0 y MySql

Tengo un Formulario, en el una DataGrid1 y un TxtBuscarNombre. Al ingresar letras similares a los registros que esté en la base de datos, quiero que me va filtrando, con el TxtBuscarNombrey mostrando en la DataGrid1 estoy usando el Adodc1 pero no sale, es diferente de la conexión Access a MySql?

en Access yo pude hacer pero en MiSql no me sale el código que tengo de VB 6 y Access es este:

Private Sub TxtBuscarNombre_Change()
Dim busca As String
busca = UCase(Trim(TxtBuscarNombre.Text)) & "%"
Adodc1.RecordSource = "select * from TablaProductos Where [NombreProducto] like'" & busca & "'"
Adodc1.Refresh
End Sub

Mi E-mail [email protected]

Muchas Gracias...