上次你是让我加入判断；把全局表事件BeforeSelChange中的命令改为以下命令；删除提示错误的问题是解决啦，但是如果我按Ctrl+列名 进行排序时，项目就自动关闭；如附件If e.Table.current IsNot Nothing Then
If e.NewRange.RowSel < 0 Then
vars("del") = True
End If
If e.NewRange.RowSel >= 0 AndAlso vars("del") = False AndAlso e.Table.current.DataRow.RowState <> DataRowState.Unchanged AndAlso vars("add") = False Then
If e.NewRange.RowSel <> e.OldRange.RowSel Then
e.Cancel=True
MessageBox.Show("当前行数据已被修改 请先保存数据再换行", "提示", MessageBoxButtons.OK, MessageBoxIcon.Question)
End If
End If
vars("add")=False
End If
加好友 
发短信
Post By：2014/7/1 14:35:00 [显示全部帖子]
