With Tables("某表")
Dim r as row = .rows(.count -1)
If r.Isnull("某列") then
messagebox.show("空")
End If
End With
加好友 
发短信
Post By：2011/7/5 10:18:00 [显示全部帖子]
