将默认项添加到数据绑定的ComboBox

Question

我有一个功能可以带回数据 [GetDrinks（）]

我使用该函数填充数据源。

我想添加一个默认值＆＃39; 选择饮料＆＃39;但它似乎不起作用，因为它只显示数据网格中的值。

有什么想法来解决这个问题吗？

cboDrinks.DataSource = GetDrinks()
cboDrinks.DisplayMember = "Drink_DESCN"
cboDrinks.ValueMember = "Drink_ID"

cboDrinks.Items.Insert(0, " Select Drink ")
cboDrinks.SelectedIndex = 0

Answer 1

根据我的评论，您需要将数据插入从GetDrinks获取的DataTable中：

Dim dt As DataTable = GetDrinks()
Dim row as DataRow = dt.NewRow
row("Drink_ID") = 0
row("Drink_DESCN") = " Select Drink "
dt.Rows.InsertAt(row, 0)

cboDrinks.DisplayMember = "Drink_DESCN"
cboDrinks.ValueMember = "Drink_ID"
cboDrinks.DataSource = dt
cboDrinks.SelectedIndex = 0

注意：在DataSource之前设置DisplayMember和ValueMember，以避免对控件进行多次刷新调用。