帮助文件抓bug。
帮助文件
http://www.foxtable.com/help/topics/2476.htm
有这么一段 代码
=============================================
假定有个员工表，有姓名和出生日期列，希望能够筛选出今天生日的行，代码为：
Dim
nms As String
For Each dr As DataRow In DataTables("员工").DataRows
Dim dt As Date = dr("出生日期")
If dt.Month = Date.Today.Month AndAlso Date.Today.Day Then
nms = nms & ",'" & dr("姓名") & "'"
End If
Next
If nms > "" Then
nms = nms.Trim(",")
Tables("员工").filter = "[姓名] In (" & nms &")"
End If
=============================================
谁能告诉我，标有背景的代码是正确，还是错误？谢谢！
[此贴子已经被作者于2012-3-15 15:42:03编辑过]
加好友 
发短信
Post By：2012/3/15 14:41:00 [显示全部帖子]
