VB中combox控件賦下拉值 vb中怎樣從其他窗體里給combox賦值？
vb中怎樣從其他窗體里給combox賦值？在表單中添加一個(gè)ComboBox控件，代碼如下；option explicit dim D（4）as integerprivate sub Combo1uuu
vb中怎樣從其他窗體里給combox賦值？
在表單中添加一個(gè)ComboBox控件，代碼如下；
option explicit dim D（4）as integerprivate sub Combo1uuuClick（）msgbox“you have selected item”&Combo1.listindex 1&“，“&”的對應(yīng)值為“&D（combo1.listindex）end subprivate sub formuLoad（）D（0）=20d（1）=30d（2）=40d（3）=80Combo1.AddItem 1Combo1.AddItem 2Combo1.AddItem 3Combo1.AddItem 4End sub