VB2008入门教程：[15]创建事件处理程序

VB2008入门教程：[15]创建事件处理程序

在本课中，您将学习如何创建事件处理程序。

当发生某个相关事情时，控件会引发事件。

控件可以引发各种类型的事件，但对于每个控件来说，始终存在一个默认事件。

按以前的方法兴建一个项目，并命名为【EventHandler】

将一个 Button 控件从“工具箱”中拖动到窗体上。

在“属性”窗口中，将 AutoSize 属性设置为 True。

在“视图”菜单中单击“代码”以打开代码编辑器。注意在代码编辑器的正上方有两个下拉框。除“Form1”、“(常规)”和“(Form1 事件)”之外，左边的框中还包含窗体上所有控件的列表。右边的框中列出了左边框中所列项的每个可用事件。

在左边的框中，单击“Button1”。

在右边的框中，单击“Click”。

一个名为 Button1_Click 的新的事件处理程序出现在代码编辑器中。

在 Button1_Click 事件处理程序中，键入以下代码：

MsgBox("You clicked the button")

运行该应用程序。当单击“Button1”时，会出现一个消息框。

在代码编辑器中，确保在左侧的下拉框中选择了“Button1”，然后在右侧的下拉框中单击 MouseEnter。

一个名为 Button1_MouseEnter 的新的事件处理程序出现在代码编辑器中。

在 Button1_MouseEnter 事件处理程序中，键入以下代码：

Button1.Text = "The Mouse has entered"

运行该应用程序。使鼠标指针经过该按钮。请注意，当鼠标指针经过“Button"时按钮上的文本会发生变化。

您可能注意到在上一例中，虽然 Button1 的文本在鼠标指针经过时发生变化，但是鼠标指针离开时该文本并未还原。如果希望文本在鼠标不再停留在按钮上时发生变化，必须处理 MouseEnter 事件和 MouseLeave 事件。

在代码编辑器中，确保在左侧的下拉框中选择了“Button1”，然后在右侧的下拉框中单击 MouseLeave。

一个名为 Button1_MouseLeave 的新的事件处理程序出现在代码编辑器中。

在 Button1_MouseLeave 事件处理程序中键入下面的代码：

Button1.Text = "The mouse has left"

运行该应用程序。

现在，当鼠标指针经过该按钮时，文本变为 The mouse has entered，而当鼠标指针不再停留在该按钮上时，文本变为 The mouse has left。

在本课中，我们学习了如何使用代码编辑器创建事件处理程序。现在，您可以继续本系列中的下一课获取用户选项：使用复选框和单选按钮。