希望真正修改某行后或者新增行后，不允许再选择它行。如下代码。
修改的可以控制了。
新增行出现问题。会先出来三次下面（MessageBox.Show）的提示，然后才不能选择它行。
问题是如何在新增行时，不要出现三次提示?
If e.OldRange.RowSel <> e.NewRange.RowSel '如果选择的是不同的行
If e.OldRange.RowSel >= 0 AndAlso e.OldRange.Rowsel < e.Table.Rows.Count Then '而且原来选择的是一个有效的数据行
Dim r As Row = e.Table.Rows(e.OldRange.Rowsel) '获得原来选择的行
Dim dr As DataRow = e.Table.Current.DataRow
If dr.RowState=DataRowState.Modified Or dr.RowState=DataRowState.Added Then
' If dr.RowState=DataRowState.Modified Then
MessageBox.Show("正在编辑数据不允许换行.保存数据或撤销修改后可以正常换行!")
e.Cancel=True
End If
End If
End If
此主题相关图片如下：qq图片20220307060606.png
加好友 
发短信
Post By：2022/3/6 19:56:00 [只看该作者]
