新聞中心
VB如何創(chuàng)建下拉列表,并將該表的數(shù)值賦給text1.text
可以這么考慮!最簡單的方法就是直接創(chuàng)建一個ComboBox控件再把下面的代碼粘貼到窗體的代碼處吧...
創(chuàng)新互聯(lián)堅持“要么做到,要么別承諾”的工作理念,服務(wù)領(lǐng)域包括:做網(wǎng)站、網(wǎng)站設(shè)計、企業(yè)官網(wǎng)、英文網(wǎng)站、手機端網(wǎng)站、網(wǎng)站推廣等服務(wù),滿足客戶于互聯(lián)網(wǎng)時代的安定網(wǎng)站設(shè)計、移動媒體設(shè)計的需求,幫助企業(yè)找到有效的互聯(lián)網(wǎng)解決方案。努力成為您成熟可靠的網(wǎng)絡(luò)建設(shè)合作伙伴!
PrivateSubCombo1_Click()
Text1.Text=Combo1.Text
EndSub
PrivateSubForm_Load()
Combo1.AddItem1,0
Combo1.AddItem2,1
Combo1.AddItem3,2
EndSub
運行程序,點擊下拉框即可為文本框賦值。
注意下,“Combo1.AddItem”后面第一個位置寫你想要的數(shù)值,的二個位置是這個數(shù)值的代號
例如上面代碼里面“Combo1.AddItem1,0”意思是在下拉框里添加一個數(shù)值“1”,代號為“0”,想修改的話把“1”改為你想要的數(shù)值就OK了,想繼續(xù)添加的話也可以在后面加Combo1.AddItem語句。另外,也可以刪掉”PrivateSubForm_Load()“到”EndSub“這段代碼,直接在Combo1的List里面直接寫下你想要的數(shù)值也行。又不懂,或是不滿意的再問吧,希望對你有幫助~
關(guān)于VB.net下拉框的問題
設(shè)置一個全局變量:
Public item As String
然后在第一個窗口那里?。?/p>
item = ComboBox1.SelectedItem.ToString()
然后加到第二個窗口那里:
ComboBox2.DropDownStyle = ComboBoxStyle.DropDownList(這個不可改內(nèi)容的設(shè)定可以在建立ComboBox的時候就設(shè)定了)
ComboBox2.Items.Add(item) (加入內(nèi)容,你或者也可以用別的,比如insert,這個可以加到指定的位置)
ComboBox2.SelectedItem = item (顯示那個剛加進來的內(nèi)容)
這樣應(yīng)該可以了,建議你多看MSDN。
vb.net 怎么根據(jù)第一個下拉框的內(nèi)容確定第二個下拉框的內(nèi)容
Public Class Form1
Dim b(9)() As String
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim a(9) As String '這個數(shù)組用來存儲第一個下拉框的全部值。
For i = 0 To 9
a(i) = i '賦值。
ReDim b(i)(9) '定義選擇第一個下拉框的值時,第二個下拉框分別有十個值。
For j = 0 To 9
b(i)(j) = i '賦值。
Next
Next
ComboBox1.Items.AddRange(a)
End Sub
Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged
ComboBox2.Items.Clear()
ComboBox2.Items.AddRange(b(ComboBox1.SelectedIndex))
End Sub
End Class
名稱欄目:vb.net給下拉框賦值 vb下拉框添加
轉(zhuǎn)載來源:http://ef60e0e.cn/article/hggjdo.html