VB.NET中AddHandler使用demo

发布时间：2020-12-17 08:06:04 所属栏目：百科来源：网络整理

导读：这是一个很简单的demo，就是实验一下AddHandler的作用，用VS2010新建一个工程，点开主窗体，添加一个方法，这个方法，提供关闭窗体的服务，里面添加了询问的操作，具体代码，如下： Private Sub CloseWindow(ByVal sender As System.Object,ByVal e As System

这是一个很简单的demo，就是实验一下AddHandler的作用，用VS2010新建一个工程，点开主窗体，添加一个方法，这个方法，提供关闭窗体的服务，里面添加了询问的操作，具体代码，如下：

    Private Sub CloseWindow(ByVal sender As System.Object,ByVal e As System.Windows.Forms.FormClosingEventArgs)
        Dim closeFlag As DialogResult = DialogResult.None
        closeFlag = MsgBox("是否关闭窗体?",MessageBoxButtons.YesNo + MessageBoxOptions.ServiceNotification)
        If closeFlag = DialogResult.No Then
            e.Cancel = True
        End If
    End Sub

然后运行程序，发现点击窗体的关闭按钮，这个事件，并未被执行，说明这个事件和窗体的程序没有绑定在一起，添加如下操作：

    Private Sub Form1_Load(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles MyBase.Load
        AddHandler MyBase.FormClosing,AddressOf CloseWindow
    End Sub

再次运行，OK，可以正常的触发事件了。

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!