您的位置:程序门 -> vb -> 控件



怎样使用动态创建的控件?


[收藏此页] [打印本页]选择字色:背景色:字体:[][][]


怎样使用动态创建的控件?
发表于:2007-01-24 10:58:16 楼主
我在程序中动态创建一个commandbutton,请问怎样获得并使用控件的click事件,谢谢!
发表于:2007-01-24 11:09:071楼 得分:0
option   explicit
dim   withevents   ctl   as   commandbutton

private   sub   command1_click()
        set   ctl   =   me.controls.add( "vb.commandbutton ",   "cmd1 ")
        ctl.caption   =   "动态创建的按钮 "
        ctl.top   =   10
        ctl.left   =   10
        ctl.width   =   1995
        ctl.visible   =   true
end   sub

private   sub   ctl_click()
          msgbox   "动态创建按钮被点击 "

end   sub
发表于:2007-01-24 11:35:282楼 得分:0
dim   withevents   ctl   as   commandbutton
发表于:2007-01-24 14:05:133楼 得分:0
再问一下,我在程序中动态创建一个commandbutton,请问怎样获得并使用控件的属性(如设置字体等),谢谢!
发表于:2007-01-25 08:55:394楼 得分:0
dim   withevents   ctl   as   commandbutton后
ctl就已经带有属性了。
set   ctl   =   me.controls.add( "vb.commandbutton ",   "command1 ")
用ctl.***   访问command1的属性
发表于:2007-01-30 16:59:235楼 得分:0
http://community.csdn.net/expert/topic/5323/5323689.xml?temp=.2694666
发表于:2007-01-30 17:48:376楼 得分:0
在界面上建立一个button,然后复制粘贴声成控件数组,然后对btn(0).visible=false.当需要添加button的时候,就load
这样比较好


快速检索

最新资讯
热门点击