Question

在我的Visual Basic应用程序中，我在第三个TabPage上有两个单选按钮。如果单击它，我会编写“否”按钮以弹出一个消息框，但是当我测试它时，而不是只显示一次消息，当我选择其他选项时，它会再次显示相同的消息，“是”。

我尝试过做多件事，但没有任何效果。对于单选按钮，我最初做了一行简单的代码：

MsgBox("insert text here", MsgBoxStyle.OkOnly, "insert title here")

我发现当你把选择改为是时出现了，我试着这样做：

If RadioButton26_Select() = True Then
   MsgBox("insert text here", MsgBoxStyle.OkOnly, "insert title here")
End If

显然，这也不起作用。在该单选按钮的第一行代码中，我将RadioButton26_CheckedChanged更改为RadioButton26_Select：

Private Sub RadioButton26_Select(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton26.Select

我改变的那一行在()之后没有Select，所以我在所有()之后放了Select。这也不起作用。

所以，我真的在这里感到困惑。任何帮助将不胜感激。

Answer 1

您想使用RadioButton.Checked property。它表示RadioButton是否被选中＆＃34;或不。

您也应该在CheckedChanged事件中执行此操作，因为每次Checked值更改时都会引发此事件。

Private Sub RadioButton26_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButton26.CheckedChanged
    If RadioButton26.Checked = True Then
        MessageBox.Show("insert text here", "insert title here", MessageBoxButtons.OK)
    End If
End Sub

如您所见，我使用MessageBox.Show()而不是MsgBox()功能。我建议你这样做，因为MsgBox()函数纯粹是为了向后兼容VB6而存在，而MessageBox.Show()是本机的.NET方式。

Visual Basic中的单选按钮和消息框问题

1 个答案: