- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]逻辑型的列，勾选，需跳出窗口确认的问题 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=104759)
-- 发布时间：2017/8/4 15:25:00
-- [求助]逻辑型的列，勾选，需跳出窗口确认的问题
逻辑型的列，勾选，需跳出窗口，确认
代码或属性，怎么设置的？
-- 发布时间：2017/8/4 15:28:00
--
|
Dim Result As DialogResult Result = MessageBox.Show("确定要删除吗?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question) If Result = DialogResult.Yes Then \'你原来的代码 End If |
用这个代码怎么修改呢？
-- 发布时间：2017/8/4 16:09:00
--
DataColChanging事件
If e.DataCol.name = "第一列" Then
Dim Result As DialogResult
Result = MessageBox.Show("确定吗?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.no Then
e.cancel = True
End If
End If
-- 发布时间：2017/8/4 16:35:00
--
此主题相关图片如下：报错.png
报错，和上面的代码冲突了吗？怎么修改呢？
-- 发布时间：2017/8/4 17:10:00
--
这个报错是正常的报错。你关闭项目，重新打开，再写代码就行了。
-- 发布时间：2017/8/4 18:18:00
--
可以了，谢了