参数用错位置了：
http://www.foxtable.com/webhelp/topics/2747.htm
GetValues(ColumnName,Filter,Sort)
ColumnName：列名称，从此列中提取不重复的值。
Filter: 可选参数，指定一个条件表达式，只返回符合此条件的值；请参考表达式的运算符和函数 和 条件表达式
Sort: 可选参数，指定排序列，如果省略，则根据取值列排序，通常无需设置。
If CurrentTable.name = "IL接头任务单"
Dim tbl As Table = Tables("IL接头任务单")
If e.Book.TempLate = "IL接头任务单" Then 'TempLate是指模板文件的名称
Dim WWC As String = "完成核对 = '" & WWC & "'"
if Tables("IL接头任务单").filter > "" then
WWC = WWC & " and " & Tables("IL接头任务单").filter
end if
Dim cnt As Integer = tbl.DataTable.GetValues( "销售订单号",WWC).count
If cnt > 0
messagebox.show("本页面存在 " & cnt & " 个未完成核对的行, 请完成核对后再使用此按钮!")
End If
End If
End If
加好友 
发短信
Post By：2021/11/27 9:35:00 [只看该作者]
