你要不这样
AfterLoad
Tables("窗口3_Table1").filter = "第一列 Is null"
button
For i As Integer = Tables("窗口3_Table1").rows.Count - 1 To 0 Step -1 Tables("窗口3_Table1").rows(i)("第一列") = "***" Next
加好友 
发短信
Post By：2014/7/17 12:56:00 [显示全部帖子]
