按照例题中：
Adodc1.Recordset.Filter = "性别='男' "
可以筛选出性别为男的数据项。

同理，我做了个用数据合成的表。
Adodc1.Recordset.Filter = "数据='5' "
这时可以筛选出数据为5的数据项，
但是当5是放在一个变量里时就不能筛选了。

即：
dim a as single
a=5
Adodc1.Recordset.Filter = "数据='a' "
就出不了数据=5的数据项了。

请教大家该怎么办？

各位高手指点一下吧！谢谢了。

dim a as single
a=5
Adodc1.Recordset.Filter = "数据="& a &" "

这样就可以了！

多谢楼上高手！


不过我又有个疑问了，如何才能输出数据库中的某一个值呢？
比如有10行8列这么个表，通过筛选，只有2行8列。

我想在这2行8里列里输出其中的第1行第3列这个数值。
我该怎么操作呢？实在是没招了。

Private Sub Command1_Click()
Dim a As String
a = Text1.Text
If Text1.Text <> "" Then
   If Text1.Text <> "请输入部门" Then
      
      Adodc1.Recordset.Filter = "领用单位='&a&'"
      'MsgBox "ok"
  Else
   MsgBox "no"
   End If
 Else
   MsgBox "no"
End If

你的filter不仍然是错的么。

好好看看书上怎么说变量和字符串的。你这个用法真是搞笑！

看起来楼主似乎没有弄明白 a=5 和 a=“5” 的区别