ASP.NET（VB）中如何用Select Case处理多分支多国籍场景

你的代码核心问题是仅处理了拆分后国籍ID数组的第一个元素，且用多个TextBox分别显示，无法实现多国籍合并展示的需求。以下是针对性的修改方案：

修改思路 #

1. 用字典映射替代Select Case，后续新增国籍时只需更新字典，无需修改分支逻辑，维护更高效
2. 遍历所有拆分后的国籍ID，逐个转换为对应的名称
3. 将所有国籍名称拼接为逗号分隔的字符串，统一展示成预期格式

修改后的代码 #

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    ' 建立国籍ID与名称的映射字典，比Select Case更易扩展
    Dim nationalityMap As New Dictionary(Of Integer, String) From {
        {1, "Vietnam"},
        {2, "Thai"},
        {3, "Australia"},
        {4, "Canada"}
    }

    ' 拆分选中的国籍ID字符串（从DropDownList获取的是类似"1,2"的值）
    Dim nationalityIds() As String = Me.DropDownList1.SelectedValue.Split(","c)
    Dim nationalityNames As New List(Of String)

    ' 遍历每个ID，安全转换并匹配对应国籍名称
    For Each idStr As String In nationalityIds
        If Integer.TryParse(idStr, Dim id) AndAlso nationalityMap.ContainsKey(id) Then
            nationalityNames.Add(nationalityMap(id))
        End If
    Next

    ' 拼接成预期的完整格式并显示（需根据DropDownList绑定逻辑调整ID和Name的获取方式）
    ' 假设DropDownList的Text是人员Name，且你已从数据源或查询中获取到Person的Id
    Dim personId As String = "1" ' 实际需替换为从数据源/查询获取的Person Id
    Dim personName As String = Me.DropDownList1.SelectedText
    TextBox1.Text = $"{personId} {personName} {String.Join(",", nationalityNames)}"
End Sub

关键补充说明 #

• 如果你的DropDownList是绑定Person表，建议将Value设为Person的Id，点击时通过Id查询数据库获取Nationality和Name，这种方式更规范，避免直接在DropDownList的Value中存储逗号分隔的字符串。
• 使用Integer.TryParse确保代码不会因国籍ID格式错误崩溃，增强了健壮性。

内容的提问来源于stack exchange，提问作者user21834984