小问题：程序运行时，如何通过程序的菜单在窗体上创建一个image控件？

Question

用控件数组
Load 控件(index)

Answer 1

Dim WithEvents ctlText As VB.ImagePrivate Sub Command1_Click()
    Set ctlText = Controls.Add("VB.Image", "ctlText1", Form1)
    '设置位置和尺寸
    ctlText.Move 30, 150, 2100, 900
    
    ctlText.Visible = True
End Sub

Answer 2

上面的代码建立一个Image控件，然后就可以Load图片了：
ctlText.Picture = LoadPicture("c:\winnt\Austria2_1024x768.bmp")

Answer 3

to: TechnoFantasy(www.applevb.com) 
请问如何定义一个数组形式的呢？
就是多次按command按钮可以创建多个这样的控件？
应该怎么改？

Answer 4

就微软的说法是不可以的，因为控件的Index属性是运行时只读的，所以你无法在代码中修改控件的Index属性。