主题：请教这条Findrow怎么写？

With CurrentTable
    Dim r As Integer
    r = .FindRow("[日期] = date.today and [用户] = user.name", 0,False ) '从当前行开始查找
    If r >= 0 Then '如果找到的话
        .Position = r '定位到找到的行.
        MessageBox.Show("找到了","哈哈")
    Else
        MessageBox.Show("没找到了","哈哈")
    End If
End With

 

 

FindRow("[日期] = date.today and [用户] = user.name", 0,False )

这句有报错 该怎么表达这个条件呢