加上判断
If c10 <> Nothing Then dr("目标4") = DataTables("成绩库").Compute("count(单位)", " " & tj1 & " >= '" & c10 & "' And [部别] = '高理' And [年级] = '" & dr("年级") & "' And [类别] = '" & tjlb & "'")
加好友 
发短信
Post By：2016/5/12 12:05:00 [只看该作者]
