新聞中心
vb.net中文本框怎么從下拉列表框中調(diào)用數(shù)據(jù),相關(guān)聯(lián)
Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
成都創(chuàng)新互聯(lián)公司擁有10多年成都網(wǎng)站建設(shè)工作經(jīng)驗(yàn),為各大企業(yè)提供做網(wǎng)站、成都網(wǎng)站設(shè)計(jì)服務(wù),對(duì)于網(wǎng)頁設(shè)計(jì)、PC網(wǎng)站建設(shè)(電腦版網(wǎng)站建設(shè))、重慶APP開發(fā)公司、wap網(wǎng)站建設(shè)(手機(jī)版網(wǎng)站建設(shè))、程序開發(fā)、網(wǎng)站優(yōu)化(SEO優(yōu)化)、微網(wǎng)站、國(guó)際域名空間等,憑借多年來在互聯(lián)網(wǎng)的打拼,我們?cè)诨ヂ?lián)網(wǎng)網(wǎng)站建設(shè)行業(yè)積累了很多網(wǎng)站制作、網(wǎng)站設(shè)計(jì)、網(wǎng)絡(luò)營(yíng)銷經(jīng)驗(yàn),集策劃、開發(fā)、設(shè)計(jì)、營(yíng)銷、管理等網(wǎng)站化運(yùn)作于一體,具備承接各種規(guī)模類型的網(wǎng)站建設(shè)項(xiàng)目的能力。
If Text1.Text = "1" Then Combo1.Text = "增加"
If Text1.Text = "2" Then Combo1.Text = "修改"
If Text1.Text = "3" Then Combo1.Text = "刪除"
End Sub
那同樣可以關(guān)聯(lián),和這個(gè)思路反過來,只是事件不是KeyUp,而是combo的change過程
Private Sub Combo1_Change()
select case combo1.text
case "增加"
text1.text=1
case "修改"
text1.text=2
case "刪除"
text1.text=3
case else
text1.text=""
end select
End Sub
關(guān)于VB.netCombobox聯(lián)動(dòng)問題
刪除所有列表項(xiàng)目
combobox2.Clear
增加新項(xiàng)目,n為你選中第一個(gè)Combobox索引,來確定你二維數(shù)組的值
n = Combobox1.Items.SelectIndex
GetLength(1) 是得到你二維數(shù)組的長(zhǎng)度
for i = 0 to aTemp.GetLength(1)
if aTemp(n,i) "" then
Combobox2.Items.Insert aTemp(n,i)
end if
next
VB 如何自動(dòng)選擇onchange事件的聯(lián)動(dòng)下拉菜單(高分求助)
這里有個(gè)JS的能實(shí)現(xiàn)你的功能,你下載那個(gè)JS,按照說明做就行了。
另一種方法是把所有的省市區(qū)保存到數(shù)據(jù)庫里,打開網(wǎng)頁的時(shí)候把省查出來并顯示,選擇省的時(shí)候更改關(guān)聯(lián)的市 區(qū)。當(dāng)然這也有兩種方法,一種用ajax,另一種則是在打開網(wǎng)頁的時(shí)候全查出來生成JS代碼,然后改變,各有優(yōu)劣,自己看著辦吧。
如果用上面那個(gè)JS的話,數(shù)據(jù)庫里保存的省市區(qū)是以漢字保存的,還有是因?yàn)槭荍S代碼,維護(hù)起來有點(diǎn)麻煩,不過省市區(qū)這些東西,基本上固定的;而用數(shù)據(jù)庫的話,則可以省市區(qū)可以以代碼的開式保存在數(shù)據(jù)庫里(如北京可以用1,天津2這樣的形式)維護(hù)起來相對(duì)容易。還是那句自己看著辦吧
vb.net 怎么根據(jù)第一個(gè)下拉框的內(nèi)容確定第二個(gè)下拉框的內(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 '這個(gè)數(shù)組用來存儲(chǔ)第一個(gè)下拉框的全部值。
For i = 0 To 9
a(i) = i '賦值。
ReDim b(i)(9) '定義選擇第一個(gè)下拉框的值時(shí),第二個(gè)下拉框分別有十個(gè)值。
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如何實(shí)現(xiàn)下拉菜單的二級(jí)聯(lián)動(dòng)?
啥叫“下拉菜單”?到底是要做菜單,還是做下拉列表?!
如果是做菜單,那就直接設(shè)置好一、二級(jí)菜單;
如果是下拉列表,那就在一級(jí)列表的click事件中,根據(jù)選擇的項(xiàng)目,動(dòng)態(tài)設(shè)置二級(jí)列表的內(nèi)容就行了。
關(guān)于VB.net下拉框的問題
設(shè)置一個(gè)全局變量:
Public item As String
然后在第一個(gè)窗口那里?。?/p>
item = ComboBox1.SelectedItem.ToString()
然后加到第二個(gè)窗口那里:
ComboBox2.DropDownStyle = ComboBoxStyle.DropDownList(這個(gè)不可改內(nèi)容的設(shè)定可以在建立ComboBox的時(shí)候就設(shè)定了)
ComboBox2.Items.Add(item) (加入內(nèi)容,你或者也可以用別的,比如insert,這個(gè)可以加到指定的位置)
ComboBox2.SelectedItem = item (顯示那個(gè)剛加進(jìn)來的內(nèi)容)
這樣應(yīng)該可以了,建議你多看MSDN。
分享文章:vb.net下拉框連動(dòng),VB下拉框
本文URL:http://www.dlmjj.cn/article/hsdghj.html