consulta de un dataset

[alfil123]

hola amigos tengo un problema con la siguiente lineas de codigo
bueno en ellas al introducir un caracter en un campo quiero que se carge una consulta con like y que el resultado se carge en un datagridview, bueno pero no me funciona

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged

Dim objConexion As OleDbConnection
Dim objAdap1 As OleDbDataAdapter
Dim objDataSet As DataSet

objConexion = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=c:\_proy\BD\datos.mdb")

objConexion.Open()

objAdap1 = New OleDbDataAdapter("SELECT proveedores.id_proveedor, proveedores.RS, proveedores.adeudo FROM proveedores where RS Like '*m*';", objConexion)

objDataSet = New Data.DataSet
objAdap1.Fill(objDataSet, "proveedores")
Me.DataGridView1.DataSource = objDataSet
objConexion.Close()

End Sub
y pues no se carga nada en el datadrid
please nose si alguien pueda dare algunas luces