set image(i).picture=loadpicture(...)

解决方案 »

  1.   

    这里用不用set倒是无所谓的
    程序报的什么错啊,不会是图片文件不存在吧
      

  2.   

    报错为invalid qualifier图片存在,是不是应该用控件数组?不用不行吗?
      

  3.   

    dim image(32) as image
      ^^^^^^^^^都写成这样了,不用控件数组还用什么?
      

  4.   

    Private Sub Form_Load()
        Dim i
        For i = 1 To 3
            Load Image1(i)
            Image1(i).Visible = True
            Image1(i).Top = i * 1000
            Image1(i).Left = 100
            Image1(i).Picture = LoadPicture("G:\www\images\01.gif")
        Next i
    End Sub