以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- haschanges 与CurrentChanged 有冲突? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=144817) |
-- 作者:nxhylczh -- 发布时间:2019/12/30 19:13:00 -- haschanges 与CurrentChanged 有冲突? 如果一个表 在CurrentChanged里有代码 BeforeSelChange 判读表是否修改,无法实现 请问有什么办法呢?
If e.OldRange.RowSel <> e.NewRange.RowSel \'如果选择的是不同的行 If e.OldRange.RowSel >= 0 AndAlso e.OldRange.Rowsel < e.Table.Rows.Count Then \'而且原来选择的是一个有效的数据行 Dim Z02 As Table = e.Form.Controls("Z02").Table \'msgbox(z02.DataTable.HasChanges) If z02.DataTable.HasChanges= True Then If MessageBox.show("转账规则定义表有数据没有保存,是否保存?","提示",MessageBoxButtons.YesNo) =DialogResult.Yes Then e.Cancel = True End If End If End If End If |
-- 作者:有点蓝 -- 发布时间:2019/12/30 20:25:00 -- CurrentChanged里有什么代码? |