VB.net的ComboBox下拉单使用空行或空值问题

    Public da As SqlDataAdapter
    Public dt As New DataSet

    Public cn As New SqlConnection()

 Private Sub ComboBox1_DropDown(sender As Object, e As EventArgs) Handles ComboBox1.DropDown
        dt.Clear()    ‘ 防止累积内容

        da = New SqlDataAdapter("select distinct 字段 from 表 ", cn)

        da.Fill(dt, "表")

        ComboBox1.DataSource = dt.Tables(0)
        ComboBox1.DisplayMember = "字段"

        ComboBox1.SelectedIndex = -1   ’插入一个空行，使其不自动选择，或者能选择一个空行

    End Sub

网上提供的 ComboBox1.DataSource = Nothing，再加上 ComboBox1.Items.Clear()不能清除因控件绑定而已经赋值ComboBox1的内容，用dt.Clear()效果不错。

用ComboBox1.SelectedIndex = -1可以选择字段内容也可以空行，用ComboBox1.SelectedText = ""也可以，就是第一次是自动选择，效果不是最好的。