根據按鈕選擇顯示文本框

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。 那么它將起作用。