以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]逻辑型的列,勾选,需跳出窗口确认的问题  (http://foxtable.net/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
--  

可以了,谢了