我定义一个类，并加入以下代码，校验一行是否全为空值
Public Function checkNullRow(table1 As DataTable, r1 As DataRow) As Boolean
checkNullRow = True
For Each c1 As DataCol In Table1.dataCols
If r1.IsNull(c1.Name) Then
Else
checkNullRow = False
Return True
End If
Next
checkNullRow = True
End Function
然后，在表的beforesavedatarow的事件中，加入
Dim dr As DataRow = e.DataRow
Dim cI As new checkInput
If cI.checkNullRow(e.DataTable,e.DataRow) Then '空行
dr.Delete
Return
End If
但是，并没有想我设想的工作。
如果我加入两个新行，一行中有数据，一行无数据，保存时，两行均被删除。何解？
加好友 
发短信
Post By：2014/10/31 10:07:00 [只看该作者]
