access的BWGS表里有两列，一列是“DH”,另一列是“NR”。添加text1、text2、command1 。text1中输入DH某列内容，，单击command1，text2显示 NR对应的结果。
Dim rs As New ADODB.Recordset
Dim connstr As String
Dim sqlstr As String

connstr = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=F:\Database1.mdb"   
（这个链接设置有问题么？如果没问题，下面的select语句为什么不执行？）      
sqlstr = "select NR from BWGS where DH='" & Text1 & "'"
（这一步有疑问 我输入 print sqlstr,出来的不是查询的结果，而是"select NR from BWGS where DH='" FPL "'",为什么)
rs.Open sqlstr, conn, adOpenKeyset, adLockReadOnly
（vb判定的错误都在这一句）

Text2 = rs!NR
rs.Close
Set rs = Nothing

connstr = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=F:\Database1.mdb"
这句话不是么？

泪流满面啊，太感谢了。
刚开始我自学mysql，还是跟cmd窗口一样的那种，学mysql用了1个多月；学mysql语句、建库、数据导入，最后。。。。。
mysql建立的数据库用vb找不到，作废；
又重新学access，还是链接搞不通，已经盯着电脑看了四五天了。
无以言谢啊！

嗯，谢谢啊，我看懂了。