vb6中如何动态添加控件

 我来答
锐利且睿智的柠檬7757
2012-10-14
知道答主
回答量:10
采纳率:0%
帮助的人:6万
展开全部
’使用 select case 编程控件的事件。
select case info.name
case "click"
’这里处理 click 事件。
’现在显示其他的 case
case else ’未知事件
’这里处理未知事件。
end selectend sub 注意:不能把一个固有的控件指定给这个 vbcontrolextender 变量; 任何这种试图将引起类型不匹配错误。
但是,您也可以通过使用 withevents 关键字声明一个对象变量,并且设置该方法返回的引用为该变量,从而编程一个动态添加控件的事件,如下所示。
option explicit
’声明对象变量为 commandbutton 。
private withevents cmdobject as commandbutton
private sub form_load()
set cmdobject = form1.controls.add("vb.commandbutton", "cmdone")
cmdobject.visible = true
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式