設(shè)置一個全局變量:

員工經(jīng)過長期磨合與沉淀,具備了協(xié)作精神,得以通過團(tuán)隊的力量開發(fā)出優(yōu)質(zhì)的產(chǎn)品。創(chuàng)新互聯(lián)堅持“專注、創(chuàng)新、易用”的產(chǎn)品理念,因為“專注所以專業(yè)、創(chuàng)新互聯(lián)網(wǎng)站所以易用所以簡單”。公司專注于為企業(yè)提供成都網(wǎng)站設(shè)計、成都網(wǎng)站建設(shè)、微信公眾號開發(fā)、電商網(wǎng)站開發(fā),小程序設(shè)計,軟件按需定制網(wǎng)站等一站式互聯(lián)網(wǎng)企業(yè)服務(wù)。
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。
Private Sub Form_Load() '窗體加載中添加選項
i="你要添加的選項"Combo.AddItem i '也可以直接在這后面添加,如果要添加多行的話可以再寫一個End Sub
例如添加1~10這10個數(shù)Private Sub Form_Load() '這里是用到循環(huán)Dim i As IntegerFor i = 1 To 10
Combo2.AddItem i
Next iEnd Sub
在后臺寫就是 DataGridView.rows[i].cells[6].controls.add(new dropdownlist());
還有 如果表結(jié)構(gòu)比較復(fù)雜 建議你自己做表,不要使用GridView,即使使用了,也自己寫修改,刪除事件,不要用自帶的,存在很多問題
您可以選擇使用CheckListBox控件。CheckListBox支持多選。
由于不清楚您用什么語言,所以我寫了VB.net?、C#.net
vb.net?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#.net?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.net?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
希望能幫到您。
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多選下拉框怎么實現(xiàn)
文章出自:http://www.jbt999.com/article10/hjjdgo.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供全網(wǎng)營銷推廣、服務(wù)器托管、網(wǎng)站營銷、網(wǎng)站改版、響應(yīng)式網(wǎng)站、網(wǎng)站排名
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:[email protected]。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)