主题：求非空行数

如何求某表某列非空的行数

Dim n as integer=0
dim drs as list(of datarow)=dataTables("日志").Select("[在线用户] is null")
for each dr As datarow in drs
   n=n+1
next
dim m as integer=DataTables("日志").DataRows.Count
Output.Show(m-n)
我这个太复杂，谁能优化一下．

Dim i As Integer
i = DataTables("表A").Compute("第一列 Is Not Null")

Dim i As Integer i = DataTables("表A").Compute("第一列 Is Not Null") 老师你的代码怎么运行时出错

看错了,还是以前的老帖子.

老大,你的这个错误犯的真是低级

Dim i As Integer
i = DataTables("表A").Compute("Count(主键列名)","第一列 Is Not Null")

所以太老的代码使用都要注意，已经过时