求助 VB 数据库 模糊查询access

请问VB要怎样实现模糊查询access数据库内容呢? 求解答,我的邮箱是644804296@qq.com

我希望的效果是,在VB界面输入查询关键词,关键词是用户名中的任意一个或者多个字符,
例如关键词是a,那么查询结果显示在list1的就应该是,abc、abcdefg、eafg,3个用户名。
例如关键词是c,那么查询结果显示在list1的就应该是,abc、cde、abcdefg,3个用户名。

但是我根据网上教程编写的下面的程序没有实现,请大家帮忙解答,谢谢。

用户名 密码
abc 12345
cde 23456
abcdefg 6661
eafg 13
hijk 15178

图片说明
图片说明
图片说明
图片说明
我输入a,然后查询的结果是eafg 1个而已,应该有3个才对

Dim cnn As ADODB.Connection
Dim rec As New ADODB.Recordset

Private Sub Command_Chaxun_Click()

List1.Clear
List2.Clear

Set cnn = New ADODB.Connection

cnn.Open "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = D:\数据库.mdb;Jet OLEDB:Database Password= greekf;Persist Security Info =false"

rec.Open "SELECT * FROM UserTable WHERE 用户名 LIKE '%" & Text_Chaxun.Text & "%'", cnn, adOpenKeyset, adLockOptimistic

Do Until rec.EOF = True

    List1.AddItem rec.Fields("用户名").Value
    List2.AddItem rec.Fields("密码").Value
    rec.MoveNext
Loop
cnn.Close

End Sub

Do Until rec.EOF = True
->
Do While Not rec.EOF

1 在ACCESS软件中直接编写sql语句要用*号SELECT FROM ReportViewSetupWHERE (((ReportViewSetup.LinkID) Like 20081016) AND ((ReportViewSetup.CaseId)=1197))ORDER BY ReportViewSetup.LinkID;2 在程序中通过sql访......
答案就在这里:关于ACCESS数据库的模糊查询
----------------------你好,人类,我是来自CSDN星球的问答机器人小C,以上是依据我对问题的理解给出的答案,如果解决了你的问题,望采纳。

大佬,可以请教一下,vb怎么查询access的关联表吗?比如我做了个学生信息系统,学生表里是学号,姓名,班级,宿舍表里是学号,宿舍号。我想用4个textbox去显示学号,姓名,班级,宿舍号,怎么写这个查询语句呀