VB.NET下拉复选框批量添加记录问题：选中项值未变更

嘿，我一眼就瞅出问题出在哪了！你遇到的批量添加记录值全部相同的问题，核心原因是错误地使用了下拉复选框控件的SelectedValue属性，而没有用当前循环到的选中项自身的Value值。

错误点拆解 #

• 在多选模式下，ddlshifttype.SelectedValue只会返回第一个被选中项的值，所以不管你遍历多少个选中的ListItem，赋值给myShiftGroup.ShiftIDValue的都是同一个固定值，导致所有插入的记录内容重复。
• 代码里还有一行完全多余且逻辑错误的语句：item.Selected = ddlshifttype.SelectedValue——Selected是布尔类型（True/False），你把字符串类型的选中值赋值给它，这完全不符合语法逻辑，必须删掉。

修正后的代码 #

If txtShiftgroupID.Text = "" Then
    Dim checkedList As List(Of String) = New List(Of String)()
    For Each item As ListItem In ddlshifttype.Items
        If item.Selected Then
            ' 关键修改：用当前遍历到的item的Value，替换控件的SelectedValue
            myShiftGroup.ShiftIDValue = item.Value
            ' 移除了错误的item.Selected赋值语句
            ShiftGroupMgt.insertShiftGroup(myShiftGroup)
            
            ' 重要提醒！如果myShiftGroup是循环外创建的同一个实例，
            ' 请在每次循环内新建实例，避免覆盖之前的属性值：
            ' myShiftGroup = New ShiftGroup() ' 替换成你的实体类名称
            ' myShiftGroup.ShiftIDValue = item.Value
            ' 这里还要给myShiftGroup的其他必要属性赋值哦
        End If
    Next
Else
    myShiftGroup.ShiftIDValue = txtShiftgroupID.Text
    ShiftGroupMgt.UpdateShiftGroup(myShiftGroup)
End If
lblMsgShiftGroup.Text = "Record save successfully"
lblMsgShiftGroup.ForeColor = Drawing.Color.Green
mpeShiftGroup.Show()
cmdsaveshiftgroup.Enabled = False
loadShiftGroup()

额外注意事项 #

• 如果myShiftGroup是在循环外部初始化的同一个对象实例，那你每次插入的其实是同一个对象的引用，后续循环的赋值会覆盖之前的属性值，最终所有插入的记录都会是最后一个选中项的值。这种情况下，一定要在每次循环内部新建一个myShiftGroup的实例，确保每条记录都是独立的对象。
• 确认你的ddlshifttype控件已经开启了多选模式（比如ASP.NET里的SelectionMode="Multiple"），否则多选功能根本无法正常工作。

内容的提问来源于stack exchange，提问作者Kamlesh Karan Jeetoo