VB.Net - 单选按钮控件

RadioButton 控件用于提供一组互斥选项。用户可以在一组中选择一个单选按钮。如果您需要在同一个窗体中放置多个单选按钮组，则应将它们放置在不同的容器控件中，例如 GroupBox 控件。

让我们通过从工具箱拖动 RadioButton 控件并将其放到窗体上来创建三个单选按钮。

单选按钮的Checked属性用于设置单选按钮的状态。您可以在单选按钮控件上显示文本、图像或两者兼有。您还可以使用Appearance属性更改单选按钮控件的外观。

RadioButton 控件的属性

以下是 RadioButton 控件的一些常用属性：

序号	属性及描述
1	Appearance 获取或设置一个值，该值确定单选按钮的外观。
2	AutoCheck 获取或设置一个值，该值指示当单击控件时 Checked 值和控件外观是否自动更改。
3	CheckAlign 获取或设置单选按钮复选框部分的位置。
4	Checked 获取或设置一个值，该值指示控件是否被选中。
5	Text 获取或设置单选按钮的标题。
6	TabStop 获取或设置一个值，该值指示用户是否可以使用 TAB 键将焦点赋予 RadioButton 控件。

RadioButton 控件的方法

以下是 RadioButton 控件的一些常用方法：

序号	方法名称及描述
1	PerformClick 为控件生成 Click 事件，模拟用户单击。

RadioButton 控件的事件

以下是 RadioButton 控件的一些常用事件：

序号	事件及描述
1	AppearanceChanged 当 RadioButton 控件的 Appearance 属性的值更改时发生。
2	CheckedChanged 当 RadioButton 控件的 Checked 属性的值更改时发生。

序号

事件及描述

AppearanceChanged

当 RadioButton 控件的 Appearance 属性的值更改时发生。

CheckedChanged

当 RadioButton 控件的 Checked 属性的值更改时发生。

请参阅 Microsoft 文档以获取 RadioButton 控件的属性、方法和事件的详细列表。

示例

在下面的示例中，让我们创建两组单选按钮，并使用它们的 CheckedChanged 事件来更改窗体的 BackColor 和 ForeColor 属性。

让我们双击单选按钮并将以下代码放入打开的窗口中。

Public Class Form1
   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
      ' Set the caption bar text of the form.  
      Me.Text = "tutorialspont.com"
   End Sub

   Private Sub RadioButton1_CheckedChanged(sender As Object, _
      e As EventArgs) Handles RadioButton1.CheckedChanged
      Me.BackColor = Color.Red
   End Sub
   
   Private Sub RadioButton2_CheckedChanged(sender As Object, _
      e As EventArgs) Handles RadioButton2.CheckedChanged
      Me.BackColor = Color.Green
   End Sub
   
   Private Sub RadioButton3_CheckedChanged(sender As Object, _ 
      e As EventArgs) Handles RadioButton3.CheckedChanged
      Me.BackColor = Color.Blue
   End Sub
  
   Private Sub RadioButton4_CheckedChanged(sender As Object, _
      e As EventArgs) Handles RadioButton4.CheckedChanged
      Me.ForeColor = Color.Black
   End Sub
   
   Private Sub RadioButton5_CheckedChanged(sender As Object, _
       e As EventArgs) Handles RadioButton5.CheckedChanged
      Me.ForeColor = Color.White
   End Sub
   
   Private Sub RadioButton6_CheckedChanged(sender As Object, _
      e As EventArgs) Handles RadioButton6.CheckedChanged
      Me.ForeColor = Color.Red
   End Sub
End Class

当使用 Microsoft Visual Studio 工具栏上提供的“启动”按钮执行并运行上述代码时，它将显示以下窗口：

vb.net_basic_controls.htm

打印页面