Foxtable(狐表)用户栏目专家坐堂 → [求助]BeforClose事件代码想写成函数,e.cancel如何处理?


  共有4843人关注过本帖树形打印复制链接

主题:[求助]BeforClose事件代码想写成函数,e.cancel如何处理?

帅哥哟,离线,有人找我吗?
loongtai
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:574 积分:4332 威望:0 精华:0 注册:2013/7/26 10:24:00
[求助]BeforClose事件代码想写成函数,e.cancel如何处理?  发帖心情 Post By:2013/10/19 12:51:00 [只看该作者]

窗口的beforeClose事件写成内部函数的形式,但是e.Cancel 语句不知如何处理?
dim fnm as string=Args(0)
Dim tr As WinForm.TreeView = Forms(fnm).Controls("TreeView1")
For Each nd As winform.treenode In tr.allnodes
    nd.Forecolor=Color.black
Next
    Dim result As Dialogresult
    result=messagebox.show("是否保存此次所做的修改?","是否保存",MessageBoxbuttons.YesNoCancel,messageboxicon.question)
    If result=DialogResult.yes Then
        保存.PerformClick()  
    Else
e.cancel=True
    End If


 回到顶部
帅哥哟,离线,有人找我吗?
blackzhu
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9879 积分:57640 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2013/10/19 13:21:00 [只看该作者]

用返回.

 回到顶部
帅哥哟,离线,有人找我吗?
hanxuntx
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2609 积分:16926 威望:0 精华:11 注册:2011/9/20 16:13:00
  发帖心情 Post By:2013/10/19 13:28:00 [只看该作者]

e.cancel = Functions.Execute("你的函数返回值")

 回到顶部