vb.net入门——Button控件的使用

Windows窗体中的Button控件时用来让用户通过单击来执行操作的。当该按钮被单击时，它看起来像是被按下，然后被释放。每当用户单击按钮时，即触发按钮的Click事件。

按钮上显示的文本，我们可以通过按钮的Text属性来改变。如果文本超出按钮宽度，则换到下一行。但是，如果控件无法容纳文本的总体高度，则将剪裁文本。

按钮 (Button) 控件还可以使用 Image 和 ImageList 属性显示图像。

一、响应按钮单击

Button 控件的最基本用法是在单击按钮时运行某些代码，单击 Button 控件还生成许多其他事件，如 MouseEnter、MouseDown 和 MouseUp 事件。当然是用这些事件的前提是各个事件之间不会产生触发冲突。

注意：如果用户尝试双击 Button 控件，每次单击将单独处理；也就是说，它不支持双击事件。

1、先把一个Button控件从工具箱中拖放到窗体中，现在我们在设计视图中双击该Button1按钮，进入代码编辑模式中，且自动生成了一个Button1_Click事件，我们在该单击事件过程中写入如下代码：

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim MyButton As Button = CType(sender, Button)

MyButton.Text = "Change my text"

End Sub

注意：sender表示的是触发该事件的事件源，我们需要使用Ctype函数来转换为对应的类才能使用。能灵活使用sender参数，就可以编写通用的多实例触发同一过程的通用过程了。

2、现在按F5运行，点击窗体上的Button1控件，按钮的文字将变为"Change my text"，如下图所示：

3、使用符号"&"+任意字母可以设置按钮的访问键，如上如所示，设置Button1的Text为"&Button1"，则可以通过按Alt+B直接响应该按钮的单击事件。

二、指定按钮作为窗体的默认按钮

在任何 Windows 窗体上都可以指定某个 Button 控件为接受按钮（即默认按钮）。每当用户按 ENTER 键时，除非当前具有焦点的是以下三种情况的控件，否则会直接响应默认按钮的单击事件。

例外情况为：

● 具有焦点的控件为另一个按钮

● 具有焦点的控件为多行文本框

● 具有焦点的控件为自定义设计了捕获 ENTER 键的控件

在设计器中指定接受按钮

1、选择按钮所驻留的窗体。

2、设置按钮为接受按钮，在“属性”窗口中，将窗体的 AcceptButton 属性设置为 Button 控件的名称。如下图所示：

以编程方式指定接受按钮或取消按钮

在合适的位置加入如下代码

Me.AcceptButton = Button1"设置接受按钮

三、指定按钮作为窗体的取消按钮

在任何 Windows 窗体上都可以指定某个 Button 控件为取消按钮。每当用户按 ESC 键时，即单击取消按钮，而不管窗体上的其他哪个控件具有焦点。通常设计这样的按钮以允许用户快速退出操作而无须执行任何动作。

在设计器中指定接受按钮

1、选择按钮所驻留的窗体。

2、设置按钮为接受按钮，在“属性”窗口中，将窗体的 CancelButton 属性设置为 Button 控件的名称。如下图所示：

以编程方式指定接受按钮或取消按钮

在合适的位置加入如下代码

Me.CancelButton = Button2"设置取消按钮

四、Button控件的DialogResult属性

用Button控件的DialogResult属性设置或获取一个值，该值在单击按钮时返回到父窗体。DialogResult属性有8个值，分别是：None、OK、Cancel、Abort、Retry、Ignore、Yes、No，默认为None。

如果某个按钮的DialogResult属性的值不是默认的None，而该父窗体时通过ShowDialog方法显示的，则单击该按钮将会自动关闭窗体而不需要挂钩任何事件，然后该窗体的DialogResult属性将设置为按钮的DialogResult。

若要创建一个“是否取消”对话框，只需要添加三个按钮，并将它们的DialogResult属性分别设置为“是”、“否”、“取消”即可，具体可以参看：vb.net入门——使用Windows窗体实现自定义对话框。