窗体加载与点击事件的实例
代码如下:
乐博网lob.cn提示:调试环境为 vs2005 + windows2003 / windows2008 / xp / vista + .NET Framework 2.0
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Me.BackColor = Color.Red Label1.Text = "乐博网提示:窗体加载时的事件" End Sub
Private Sub Form1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Click Me.BackColor = Color.Yellow Label1.Text = "乐博网提示:单击窗体时的事件" End Sub
End Class
|