Question

我有一个列出不同业务类别的单选按钮列表。最后一个选项是Other类别。当用户选择Other类别时，我希望能够启用一个文本框，然后用户可以输入更多信息来解释Other选择。

目前，我正在尝试

    If rblCategory.SelectedIndex = 20 Then
        txtOther.Enabled = True
        lblOther.Text = rblCategory.SelectedItem.Text()
    End If

在这段摘录中，我将它基于索引，但我也尝试将其基于Text字段以及Value字段，但我仍然没有让它工作。有什么建议吗？

Answer 1

如果您的断点未被击中，那么这是一个很好的线索，表明更大的错误。您正在使用的所有控件都具有ViewStateEnabled = true吗？对于单选按钮列表，我认为您可能需要设置CausesValidation = true，以及AutoPostBack = true。默认情况下，某些控件不会回发，我认为这可能是其中之一。

Answer 2

你可以通过简单地挂钩到最后一个radiobutton的OnCheckChanged事件来简化这个。

Private Sub OtherRadioButton_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles OtherRadioButton.CheckedChanged
    Dim r As RadioButton = CType(sender, RadioButton)

    txtOther.Enabled     = r.Checked
    lblOther.Text        = r.Text
End Sub

根据所选的单选按钮启用文本框

2 个答案: