ComboBox从数据库添加item 控件显示闪烁问题

下面是添加item代码 (已成功)
Connection = New OleDbConnection(Access)
        Dim SavedDataAdapter As New OleDbDataAdapter("Select Distinct [项目名称] From [" & TableName & "]", Connection)
        Connection.Close()
        SavedDataAdapter.Fill(SavedDataSet, TableName)
        ComboBoxProjectName.DataSource = SavedDataSet
        ComboBoxProjectName.DisplayMember = TableName & ".项目名称"
        Connection.Close()

但是每次运行这段代码ComboBox控件都闪烁
网上查找了原因 说是一下在在item里面添加太多 导致重绘了多次控件 解决代码如下

Dim i As Integer = 0
ComboBox1.BeginUpdate()
For i = 0 To 999
ComboBox1.Items.Add("Item " & ComboBox1.Items.Count.ToString)
Next
ComboBox1.EndUpdate()

求教各位大神 我的代码怎么修改 才能避免ComboBox闪烁!!! 跪谢 --------------------编程问答-------------------- 程序我试了下。你这个是写在哪个事件下面的？是不是做了无限循环了。无限的向ComboBox中添加item了。估计问题是出现在了你的事件处理上。你可以自己调试下，将程序考出来换个单一事件触发。
或者弄个计数器，查看ComboBox里的item是否在一直增加！调试方法很多。
还有你把上段代码贴出来干嘛，有必然的联系吗？

补充：.NET技术 ,  VB.NET