vb.net combobox 如何清空數(shù)據(jù)

（1）如果ComboBox中的不是通過(guò)數(shù)據(jù)綁定得到的，用ComboBox.Items.Clear?方法?從?ComboBox?中移除所有項(xiàng)。

10多年的雁塔網(wǎng)站建設(shè)經(jīng)驗(yàn)，針對(duì)設(shè)計(jì)、前端、開(kāi)發(fā)、售后、文案、推廣等六對(duì)一服務(wù)，響應(yīng)快，48小時(shí)及時(shí)工作處理。成都全網(wǎng)營(yíng)銷(xiāo)的優(yōu)勢(shì)是能夠根據(jù)用戶(hù)設(shè)備顯示端的尺寸不同，自動(dòng)調(diào)整雁塔建站的顯示方式，使網(wǎng)站能夠適用不同顯示終端，在瀏覽器中調(diào)整網(wǎng)站的寬度，無(wú)論在任何一種瀏覽器上瀏覽網(wǎng)站，都能展現(xiàn)優(yōu)雅布局與設(shè)計(jì)，從而大程度地提升瀏覽體驗(yàn)。成都創(chuàng)新互聯(lián)從事“雁塔網(wǎng)站設(shè)計(jì)”,“雁塔網(wǎng)站推廣”以來(lái)，每個(gè)客戶(hù)項(xiàng)目都認(rèn)真落實(shí)執(zhí)行。

'清除所有項(xiàng)

ComboBox1.Items.Clear()

'清除ComboBox1顯示

ComboBox1.ResetText()

（1）如果ComboBox中的是通過(guò)數(shù)據(jù)綁定得到的，在用ComboBox.Items.Clear?方法?從?ComboBox?中移除所有項(xiàng)之前，先斷開(kāi)綁定的數(shù)據(jù)源。

'斷開(kāi)數(shù)據(jù)源

ComboBox1.DataSource?=?Nothing

'清除所有項(xiàng)

ComboBox1.Items.Clear()

'清除ComboBox1顯示

ComboBox1.ResetText()

VB.net Combobox默認(rèn)值清空問(wèn)題

首先，combobox控件里的項(xiàng)目編號(hào)，從0開(kāi)始，既第1項(xiàng)是0，第2項(xiàng)是1，......

所以，我不知道你這個(gè)1是不是指第2項(xiàng)？

其次，要讓Combobox.Text的值變化為第1項(xiàng)的內(nèi)容，你應(yīng)該這樣：

Combobox.Text = Combobox.items(1) '注意，這個(gè)是顯示第2項(xiàng)的內(nèi)容

這樣， Combobox.SelectIndex的值就是1了。

vb.net combobox 控件

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

ComboBox1.Items.Add("米")

ComboBox1.Items.Add("分米")

ComboBox1.Items.Add("厘米")

ComboBox1.DropDownStyle = ComboBoxStyle.DropDownList

End Sub

Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged

Select Case ComboBox1.SelectedIndex

Case 0

TextBox1.Text = "1"

Case 1

TextBox1.Text = "10"

Case 2

TextBox1.Text = "100"

Case Else

TextBox1.Text = ""

End Select

End Sub

End Class

vb.net combobox.items怎么樣直接引用某excel指定列的非重復(fù)值？

可以先用字典法得到不重復(fù)值的數(shù)組：

Set d=CreateObject(“Scripting.Dictionary”)

For i =1 to Cells(rows.count,1).end(3).row

d(cells(i ,1).value)=“”

Next

y=d.keys

再賦值給控件