PictureBox包含问题

Question

请问下大家，动态添加的控件，比如Picture1(0),Picture2(0)，要怎样将Picture2(0)放在Picture1(0)里？我使用.parent属性为什么不行？还报错？谢谢！

Answer 1

事先在设计状态时将PICTURE2放到PICTURE1里。然后运行时再创建就可以了。
═══════════════════
http://www.egooglet.com 资料、源码下载http://bbs.j2soft.cn 论坛交流
═══════════════════

Answer 2

Private Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As LongPrivate Sub Command1_Click()
    Load Picture2(1)
    Picture2(1).Visible = True
    SetParent Picture2(1).hWnd, Picture1(0).hWnd
    Picture2(1).Move 0, 0
End Sub