ASPxRadioButtonList无法根据数据库值选中对应单选按钮的解决方法

核心问题分析 #

你的代码存在两个关键错误，导致单选按钮无法正确选中：

1. 索引计数错误：ASPxRadioButtonList的SelectedIndex是从0开始计数的——第一个选项Expenses的索引为0，第二个Travel的索引为1，但你代码中设置的是1和2，完全对应不到目标选项。
2. 类型匹配与逻辑冗余：控件的ValueType已设为System.String，但你直接用数值1/2与数据库返回值比较，可能存在隐式类型转换问题；且通过索引选中的方式依赖选项顺序，不如直接绑定SelectedValue可靠。

修正后的代码方案 #

方案1：修正SelectedIndex的索引值 #

调整索引为0和1，同时统一类型匹配逻辑：

Dim dt As New DataTable 
Dim strSelect As String = "SELECT claim_type FROM detail_table WHERE id = '30'"
Dim myconn As New clsConnection

Try
    myconn.OpenConnection()
    myconn.FillDataTable(dt, strSelect)
    
    If dt.Rows.Count > 0 Then  
        Dim claimType As Object = dt.Rows(0).Item("claim_type")
        ' 索引从0开始匹配对应选项
        If claimType.ToString() = "1" Then
            radClaimType.SelectedIndex = 0
        ElseIf claimType.ToString() = "2" Then
            radClaimType.SelectedIndex = 1
        End If
      
        radClaimType.Enabled = False
    End If
Catch ex As Exception
    MsgBox("Error: " & ex.Message)
Finally
    ' 放到Finally块确保无论是否异常都能关闭连接
    myconn.CloseConnection()
End Try

方案2：直接设置SelectedValue（更推荐） #

无需依赖选项顺序，直接通过值匹配选中，逻辑更简洁健壮：

Dim dt As New DataTable 
Dim strSelect As String = "SELECT claim_type FROM detail_table WHERE id = '30'"
Dim myconn As New clsConnection

Try
    myconn.OpenConnection()
    myconn.FillDataTable(dt, strSelect)
    
    If dt.Rows.Count > 0 Then  
        ' 转换为字符串匹配控件的ValueType设置
        radClaimType.SelectedValue = dt.Rows(0).Item("claim_type").ToString()
        radClaimType.Enabled = False
    End If
Catch ex As Exception
    MsgBox("Error: " & ex.Message)
Finally
    myconn.CloseConnection()
End Try

额外注意事项 #

• 确认clsConnection的FillDataTable方法能正确填充数据，调试时可检查dt.Rows(0).Item("claim_type")的实际值与类型。
• 若数据库中claim_type本身是字符串类型，直接赋值SelectedValue即可，无需额外转换。

内容的提问来源于stack exchange，提问作者Una O Lian