麻烦您告诉我一下如何动态创建pictureBox的,谢谢啦

麻烦您告诉我一下如何动态创建pictureBox的,谢谢啦,第1张

基于控件数组的动态控件的创建

(1)首先在窗体上放置一个pictureBox,其Name属性设置为p1,Index属性设置为0,这样我们就创建了一个pictureBox控件数组,其中有一个成员。

(2)在窗体上放置一个命令按钮Command1,在其Click事件中添加如下的代码:

Load pictureBox(1) '这样就可以创建出一个pictureBox 控件了

基于控件对象

Set mycontrol = Controls.Add("VB.pictureBox", "mycontrol")'参数:系统控件对象字 ,控件实例名

mycontrol.Left = 0

mycontrol.Visible = True

可以使用Load方法

语法为:Load object

要求必须预先创建一个控件数组

例如,现在你已经创建了一个command的控件数组,它的name为cmd

(方法请自行百度)

开始的一个元素的调用方法为

Cmd1(0).属性

其中()内的为 *** 作元素的下标。只要Load对应的数组元素。即可完成元素的载入,载入成功后可以当做一个普通控件来 *** 作。

此时如果需要添加多个,请使用For循环+Load语句实现

For i=1 to 20

Load Cmd(i)

Cmd(i).visible=ture

....

....

next i


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/bake/11747566.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-18
下一篇 2023-05-18

发表评论

登录后才能评论

评论列表(0条)

保存