VB如何通过LOAD在特定位置加控件呢?

Question

假设我有一组PICTUREBOX,序号由0-4共5个,然后我在第一个(即PICTUREBOX(0))里面放入一个LABEL1(0),那么我应该如何才能通过LOAD OBJECT这一涵数来分别在PICTUREBOX(1-4)里面增加LABEL1(1-4)呢?谢谢

Answer 1

是不是大家误会了我的意思啊?我不是想把LABEL放在PICTUREBOX的外面而已,我是想做成LABEL是以PICTUREBOX为容器的那种,就想你把LABEL画在PICTUREBOX里面的那种一样.

Answer 2

label(i).left=picturebox1(i).left
label(i).top=picturebox1(i).top

Answer 3

我都说了,不是只是想把LABEL的位置给定位,而是还要把PICTURE(I)作为LABEL(I)的一个载体,一个容器存放这种,该如何进行LOAD呢?

Answer 4

做个用户控件，一个picturebox内添加一label

Answer 5

类似了,但是我想用LOAD来动态增加,而且需要的是每个PICTUREBOX(I)就包含一个LABEL(I)的信息,怎么搞呢?

Answer 6

set lbl(0).Container=pic(0)
lbl(0).move x,x,x,x

Answer 7

谢谢shendun2007,我就是要这种了

Answer 8

load之后用
Set Label1(i).Container = Picture1(i)
Private Sub Command1_Click()
For i = 1 To 4
    Load Picture1(i)
    Load Label1(i)
    Picture1(i).Top = Picture1(i - 1).Top + Picture1(i).Height
    Set Label1(i).Container = Picture1(i)
    Picture1(i).Visible = True
    Label1(i).Visible = True
Next iEnd Sub