ComboBox绑定DataSource后添加默认空白项及重置功能实现问询

我完全理解你碰到的这个困扰——绑定数据源后的ComboBox没法回到空白默认状态，必须保留选中值，试过设置SelectedIndex = -1但找不到合适的触发时机，确实挺头疼的。先看看你当前的方案，其实没必要修改数据库（你的代码里调用了Update），咱们可以用更轻量、更合理的方式解决：

更优方案1：在内存数据源中插入空项（适合DropDownList风格） #

如果你的ComboBox是DropDownList风格（用户只能选择列表中的项），最稳妥的方式是在填充数据源之后，在内存中的DataTable里插入一条空记录，这样既能保留数据源绑定的优势，又能让用户选择空白选项：

' 填充数据源
If Not IsDBNull(Me.OrgcustomerBindingSource.Current("parentID")) And Me.OrgcustomerBindingSource1.Count = 0 Then
    Me.OrgcustomerTableAdapter1.Fill(Me.LookupCustomer.orgcustomer)
    
    ' 创建空行并插入到数据源开头
    Dim emptyRow As DataRow = Me.LookupCustomer.orgcustomer.NewRow()
    emptyRow("ID") = 0
    emptyRow("CompanyName") = ""
    ' 其他列按需设置为空或默认值，比如：
    ' emptyRow("OtherColumn") = DBNull.Value
    
    ' 插入到DataTable的第一行
    Me.LookupCustomer.orgcustomer.Rows.InsertAt(emptyRow, 0)
    
    ' 默认选中这个空项（可选，根据需求决定）
    Me.OrgcustomerBindingSource1.Position = 0
End If

这个方案的好处是：

• 不需要修改数据库，空项只存在于内存中，不会产生冗余数据
• 完全适配绑定数据源的逻辑，不会破坏数据绑定的生命周期
• 触发时机很明确，就在Fill数据源之后执行即可

更优方案2：直接设置SelectedIndex=-1（适合DropDown风格） #

如果你的ComboBox是DropDown风格（用户可以手动输入内容），不需要修改数据源，直接设置SelectedIndex = -1就能清空选中状态。你之前找不到合适的触发事件，可以试试这些时机：

1. Form加载完成后：在Form_Load事件的末尾执行
2. 用户触发清空操作：比如添加一个“清空”按钮，点击时执行
3. ComboBox下拉关闭后（如果需要用户取消选择时自动清空）

示例代码：

' 比如在Form加载完成后执行
Private Sub YourForm_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    ' 先完成数据源绑定和填充逻辑
    ' ...
    ' 然后清空选中状态
    Me.ParentIDComboBox.SelectedIndex = -1
End Sub

' 或者给ComboBox加下拉关闭事件
Private Sub ParentIDComboBox_DropDownClosed(sender As Object, e As EventArgs) Handles ParentIDComboBox.DropDownClosed
    ' 可以加判断，比如用户没选择任何项时清空
    If Me.ParentIDComboBox.SelectedIndex = -1 Then
        Me.ParentIDComboBox.Text = ""
    End If
End Sub

为什么不推荐你当前的方案？ #

你当前的代码里调用了Me.OrgcustomerTableAdapter1.Update(Me.LookupCustomer.orgcustomer)，这会把空项持久化到数据库里，完全没必要——空白选项只是UI层面的需求，不需要保存到后端，反而会增加数据库的无效数据。

你的原始问题描述：
我在网上查阅了大量相关内容，仍未找到合适的解决方案。目前我会按需为ComboBox绑定数据源并填充数据，但用户点击ComboBox加载数据后，无法将其重置为空白/默认状态，必须保留一个选中值。
我知道可在加载或其他事件中设置ComboBox的SelectedItem = -1，但没有合适的触发事件来执行此操作。
以下是我拟采用的实现方案，但我认为存在更优的实现方式：

If Not IsDBNull(Me.OrgcustomerBindingSource.Current("parentID")) And Me.OrgcustomerBindingSource1.Count = 0 Then 
    Me.OrgcustomerTableAdapter1.Fill(Me.LookupCustomer.orgcustomer) 
    Dim dr As DataRow = DirectCast(Me.OrgcustomerBindingSource1.AddNew, DataRowView).Row 
    dr.BeginEdit() 
    'Add every column her with ID of 0? 
    dr.Item("ID") = 0 
    dr.Item("CompanyName") = "" 
    '(...) 
    Me.Validate() 
    Me.OrgcustomerBindingSource1.EndEdit() 
    Me.OrgcustomerTableAdapter1.Update(Me.LookupCustomer.orgcustomer) 
    'Me.ParentIDComboBox.Items.Insert(0, String.Empty) 
End If 

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