VB.NET ComboBox下拉时出现“There is no row at position 0”错误求助

错误原因分析 #

这个错误通常是因为ComboBox在绑定数据源过程中，尝试访问不存在的行（比如默认选中第一行，但数据未完全填充或查询结果为空），或是绑定顺序不当导致控件内部状态异常。

修复后的代码 #

Private Sub client_name_DropDown(sender As Object, e As EventArgs) Handles client_name.DropDown
    ' 清空原有数据源，避免新旧状态冲突
    client_name.DataSource = Nothing

    ' 使用Using语句自动释放数据库资源，避免泄漏
    Using cmd As New SQLiteCommand("SELECT Name FROM client WHERE Type = 'Recipient'", cn)
        If cn.State = ConnectionState.Closed Then
            cn.Open()
        End If

        Using adapter As New SQLiteDataAdapter(cmd)
            Dim table As New DataTable()
            adapter.Fill(table)

            ' 处理空表情况，防止控件尝试访问不存在的行
            If table.Rows.Count = 0 Then
                table.Rows.Add("无收件人数据")
            End If

            ' 先设置显示字段再绑定数据源，让控件明确要渲染的列
            client_name.DisplayMember = "Name"
            client_name.DataSource = table
        End Using
    End Using

    ' 全局连接使用后及时关闭，避免长期占用
    If cn.State = ConnectionState.Open Then
        cn.Close()
    End If
End Sub

关键修复点 #

• 清空旧数据源：重新绑定前设置client_name.DataSource = Nothing，避免控件残留旧状态引发冲突。
• 资源自动管理：用Using语句包裹数据库操作对象，确保命令、适配器等资源自动释放，提升稳定性。
• 空表处理：查询结果为空时添加提示行，防止控件试图访问索引0的不存在行。
• 调整绑定顺序：先指定DisplayMember再绑定DataSource，让控件提前明确显示字段，避免绑定过程中因字段不明确触发异常。

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