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


  共有3882人关注过本帖平板打印复制链接

主题:[求助]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


 回到顶部