您可以選擇使用CheckListBox控件。CheckListBox支持多選。
創(chuàng)新互聯(lián)公司服務(wù)項(xiàng)目包括青州網(wǎng)站建設(shè)、青州網(wǎng)站制作、青州網(wǎng)頁制作以及青州網(wǎng)絡(luò)營銷策劃等。多年來,我們專注于互聯(lián)網(wǎng)行業(yè),利用自身積累的技術(shù)優(yōu)勢、行業(yè)經(jīng)驗(yàn)、深度合作伙伴關(guān)系等,向廣大中小型企業(yè)、政府機(jī)構(gòu)等提供互聯(lián)網(wǎng)行業(yè)的解決方案,青州網(wǎng)站推廣取得了明顯的社會效益與經(jīng)濟(jì)效益。目前,我們服務(wù)的客戶以成都為中心已經(jīng)輻射到青州省份的部分城市,未來相信會繼續(xù)擴(kuò)大服務(wù)區(qū)域并繼續(xù)獲得客戶的支持與信任!
由于不清楚您用什么語言,所以我寫了VB點(diǎn)虐 ?、C#點(diǎn)虐
vb點(diǎn)虐 ?Code
'?Determine?if?there?are?any?items?checked.
If?CheckedListBox1.CheckedItems.Count??0?Then
'?If?so,?loop?through?all?checked?items?and?print?results.
Dim?x?As?Integer
Dim?s?As?String?=?""
For?x?=?0?To?CheckedListBox1.CheckedItems.Count?-?1
s?=?s??"Checked?Item?"??(x?+?1).ToString??"?=?"??CheckedListBox1.CheckedItems(x).ToString??ControlChars.CrLf
Next?x
MessageBox.Show(s)
End?If
C#點(diǎn)虐 ?Code
//?Determine?if?there?are?any?items?checked.
if(checkedListBox1.CheckedItems.Count?!=?0)
{
//?If?so,?loop?through?all?checked?items?and?print?results.
string?s?=?"";
for(int?x?=?0;?x?=?checkedListBox1.CheckedItems.Count?-?1?;?x++)
{
s?=?s?+?"Checked?Item?"?+?(x+1).ToString()?+?"?=?"?+?checkedListBox1.CheckedItems[x].ToString()?+?"\n";
}
MessageBox.Show?(s);
}
vb點(diǎn)虐 ?Code
Private?Sub?Button1_Click(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Button1.Click
Dim?selectstr?As?String?=?""
For?i?As?Integer?=?0?To?Me.CheckedListBox1.Items.Count?-?1
If?Me.CheckedListBox1.GetItemChecked(i)?Then
selectstr?=?Me.CheckedListBox1.Items(i).ToString
End?If
Next
MsgBox(selectstr)
End?Sub
希望能幫到您。
設(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 (顯示那個剛加進(jìn)來的內(nèi)容)
這樣應(yīng)該可以了,建議你多看MSDN。
你是數(shù)據(jù)庫查詢吧,SQL之類的,很容易?。?/p>
這很容易,要做幾個combobox出來好了,里面是條件,比如 A大于0 ,A等于0,A小于0
然后用selece Case combo1.text 判斷一下。如:
dim A as string
A ="select * form XXX where 1=1 and "
selece Case combo1.text
Case "A大于0"
A = A "a0"
Case "A等于0"
A = A "a=0"
...
select end
下面比如B列判斷之類的,到最后執(zhí)行SQL查詢命令,把結(jié)果顯示出來就OK了。
VB6里面實(shí)現(xiàn)不了。只能做成一個一覽。可以利用部分功能滿足你的需求。listbox里面有個屬性Style。設(shè)置為1:CheckBox就可以了。
想做成你說的那樣的話,得自己自定義插件。
網(wǎng)頁標(biāo)題:vbnet下拉框多選 vb下拉框選中一個選項(xiàng)后 觸發(fā)事件
轉(zhuǎn)載來源:http://chinadenli.net/article20/ddeejco.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供靜態(tài)網(wǎng)站、外貿(mào)網(wǎng)站建設(shè)、響應(yīng)式網(wǎng)站、網(wǎng)站設(shè)計、App設(shè)計、軟件開發(fā)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)