Question

vb.net WithEvents是什么作用啊

如题，在代码中看到了WithEvents，也上网查了一些资料，但还是没有理解透彻它到底是怎么用的。
如果可以的话，希望大家伙能帮帮我，最好给一个简单的例子帮助理解，先谢谢了

Answer 1

其实是一个定义变量时候的修饰符，指的是被修饰的变量拥有所定义的类的属性和方法。

 

举个最简单的例子：

 

Public Class Form1
 
    Dim WithEvents a As Form1
 
    Private Sub Form1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Click
        a = Me
        a.Text = "abc"
        a.Close() 
    End Sub
 
End Class

这里定义了一个名为 a 的 Form1 类型的变量，加上 WithEvents 修饰就是说这个 a 拥有了 Form1 这种类型的属性和方法。

 

a = Me，先实例化给 a 赋值成了当前窗体。

a.Text = "abc" a.Close()，a 目前就已经相当于 Form1了。

 

当然这是最简单的一个示范例子，实际使用中并不是这么用的。

 

再给个例子，题主能看明白否？

Public Class Form1
    Dim WithEvents a As abc
    Private Sub Form1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Click
        a = New abc
        a.abcd()
    End Sub
End Class
 
Public Class abc
    Sub abcd()
        MsgBox("123")
    End Sub
End Class