1、首先新建一個(gè)Windows應(yīng)用程序,將主窗體重命名為MainForm,在MainForm中加入一個(gè)DataGridView控件,命名為dgv_User。

創(chuàng)新互聯(lián)網(wǎng)站建設(shè)公司,提供網(wǎng)站設(shè)計(jì)、網(wǎng)站制作,網(wǎng)頁(yè)設(shè)計(jì),建網(wǎng)站,PHP網(wǎng)站建設(shè)等專(zhuān)業(yè)做網(wǎng)站服務(wù);可快速的進(jìn)行網(wǎng)站開(kāi)發(fā)網(wǎng)頁(yè)制作和功能擴(kuò)展;專(zhuān)業(yè)做搜索引擎喜愛(ài)的網(wǎng)站,是專(zhuān)業(yè)的做網(wǎng)站團(tuán)隊(duì),希望更多企業(yè)前來(lái)合作!
2、打開(kāi)窗體代碼窗口,在代碼窗口中聲明一個(gè)ComboBox的控件
// 定義下拉列表框
private ComboBox cmb_Temp = new ComboBox();
3、方法:
/// summary
/// 綁定下拉列表框
/// /summary
private void BindSex()
{
DataTable dtSex = new DataTable();
dtSex.Columns.Add("Value");
dtSex.Columns.Add("Name");
DataRow drSex;
drSex = dtSex.NewRow();
drSex[0] = "1";
drSex[1] = "";
dtSex.Rows.Add(drSex);
drSex = dtSex.NewRow();
drSex[0] = "0";
drSex[1] = "";
dtSex.Rows.Add(drSex);
cmb_Temp.ValueMember = "Value";
cmb_Temp.DisplayMember = "Name";
cmb_Temp.DataSource = dtSex;
cmb_Temp.DropDownStyle = ComboBoxStyle.DropDownList;
}
源碼給你,采納 不謝
等下,我好想發(fā)現(xiàn)了什么 你是想用comb 控件來(lái)顯示列數(shù)據(jù)?
這有點(diǎn)不切實(shí)際
用datagridview控件來(lái)顯示吧(舉個(gè)例子給你 excel 表)
dim xb as excel.workbook
dim xp as excel.application
dim column as long
Dim index As Integer = DataGridView1.Rows.Add()
xb=xp.workbook.open("你的excel數(shù)據(jù)表")
column=xb.columns.count
for j as integer= 1 to column
if xb.rows.cells(1,j)=comb1.selectedvalue then
DataGridView1.Rows(index).Cells(j - 1).Value = xp.rows("1").Cells(j - 1).Value
xb.close(true)
xp.close(true)
xb=nothing
xp=nothing
采納后可以追問(wèn)
設(shè)置一個(gè)全局變量:
Public item As String
然后在第一個(gè)窗口那里取:
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)來(lái)的內(nèi)容)
這樣應(yīng)該可以了,建議你多看MSDN。
Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
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è)思路反過(guò)來(lái),只是事件不是KeyUp,而是combo的change過(guò)程
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
網(wǎng)站題目:vb.net中下拉框綁定,vb下拉式組合框
分享URL:http://chinadenli.net/article13/dseeeds.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站導(dǎo)航、手機(jī)網(wǎng)站建設(shè)、云服務(wù)器、網(wǎng)頁(yè)設(shè)計(jì)公司、動(dòng)態(tài)網(wǎng)站、域名注冊(cè)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)