主题：界面问题

方法一：
窗口定时器中：
 
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
 

呵呵，建议多学习，否则别人帮你写的代码，你没有办法理解，一个笔误能害死你：

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 = cnt
end if