根据按钮选择显示文本框

Question

我希望仅在选择单选按钮时才显示文本框。 我尝试使用RadioButtonList，但无法正常工作，因此我使用了单独的单选按钮。 但是，它没有用。 这是代码：

Protected Sub radItem_CheckedChanged(sender As Object, e As EventArgs) Handles radItem.CheckedChanged
    If radItem.Checked = True Then
        radClient.Checked = False
        radUser.Text = False
        btnSearch.Visible() = True
        txtSearch.Visible() = True
    End If
End Sub

Protected Sub radUser_CheckedChanged(sender As Object, e As EventArgs) Handles radUser.CheckedChanged
    If radUser.Checked = True Then
        radItem.Checked = False
        radClient.Text = False
        btnSearch.Visible() = True
        txtSearch.Visible() = True
    End If
End Sub

Protected Sub radClient_CheckedChanged(sender As Object, e As EventArgs) Handles radClient.CheckedChanged
    If radClient.Checked = True Then
        radItem.Checked = False
        radUser.Text = False
        btnSearch.Visible() = True
        txtSearch.Visible() = True
    End If
End Sub

我敢肯定，无论如何，这是一种非常有效的方法。

Answer 1

如tymeJV提到的，除去()在Visible()

而且，除非其他radioButton分别进行了专门分组，否则您无需禁用它们。

由于无论选择哪个单选按钮，总是使按钮/文本框可见，因此您无需检查单选按钮的值。 您的活动应如下所示（更改其他人以跟风）

Protected Sub radItem_CheckedChanged(sender As Object, e As EventArgs) Handles radItem.CheckedChanged
    btnSearch.Visible = True
    txtSearch.Visible = True
End Sub

Answer 2

您应该使用Click Event，并且由于您要处理相同的多个单选按钮

Protected Sub rad_Click(sender As Object, e As EventArgs) Handles radItem.Click, radUser.Click, radClient.Click
     If Ctype(sender, RadioButton).Checked = False Then Exit Sub
     Select Case Ctype(sender, RadioButton).Name
          Case "radItem"
               radUser.Text = False 'You are setting the Text value to False?
                                    'Are you sure about this?

          Case "radUser"
               radClient.Text = False

          Case Else 'radClient
               radUser.Text = False
     End Select

     'You are doing this regardless of which radio button is checked
     radItem.Checked = False 'This is weird. You wont be able to use radItem.

     'I dont think you need this two lines anymore. There is always 1 RadioButton that is checked
     btnSearch.Visible = True
     txtSearch.Visible = True
End Sub

Answer 3

票价，在将“ GroupName”属性添加到单选按钮后，您无需设置其他单选按钮的“文本”或“已检查”状态，它将自动更新。

对于“显示/隐藏”文本框，只需要设置txtSearch.Visible() = True或txtSearch.Visible() = False

Answer 4

在每个单选按钮中将AutoPostBack属性设置为true。 那么它将起作用。