美人计by石头与水下载:vb 简单问题

来源:百度文库 编辑:中科新闻网 时间:2024/05/12 10:39:28
我在代码中新建一个控件 Dim combo2 As ComboBox (不知道有没有错)

运行时不出错!!请问我怎么在窗体(form1)中显示出 combo2(运行时)

在线等,谢谢

Private Sub Form_Load()
Dim combo2 As ComboBox
Set combo2 = me.Controls.Add("vb.combobox", "combo2")
combo2.Visible = True
End Sub
用这个,还不用拖实例,直接用代码搞定

dim test as combobox
'在窗体的LOAD事件中载入,并显示

private sub form_load()

load test
test.visible=true
test.move 100,100,500,200
end sub

你试试看,我手头上没VB,也没测试过,应该可以的

Set combo2 = Form1.Controls.Add("vb.combobox", "combo2")
combo2.Visible = True

窗体Load事件中加入
combo2.Visible=True

实例化对象,再设置对象的属性,这里的对象是指combo2下拉列表框。你试试?