(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
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)