筛选语句格式请教(谢谢CUXUN已解决）

大连海员

各位大侠：

我最近套用了一个筛选语句，但由于原来的语句中有日期的格式，目前我的格式全部是文本，不太会改格式，导致屡次出错，现向大家请教：

Private Sub 物品名称筛选_AfterUpdate()

Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[人名] = #" & Me![人名筛选] & "# And [物品名称] = '" & Me![物品名称筛选] & "'"
Me.Bookmark = rs.Bookmark
End Sub

以上这个语句目前是错误的，就错在“人名、人句筛选、物品名称、物品名称筛选”均为文本格式。

请哪位高手帮助修改一下。

谢谢

[ 本帖最后由 大连海员 于 2007-12-15 15:21 编辑 ]