方法一:
窗口定时器中:
Dim cnt As Integer
cnt = DataTables("监理招标信息").Compute("Count([审核])", "审核 is null")
e.form.Controls("Label1").Text = value
定时器可以设置为一秒运行一次:
http://www.foxtable.com/help/topics/1301.htm
方法二:
在表的DatacolCahnged事件:
if e.DataCol.Name = "审核" AndAlso Forms("窗口1").opened Then
Dim cnt As Integer
cnt = e.DataTable.Compute("Count([审核])", "审核 is null")
Forms("窗口1").Controls("Label1").Text = value
end if