form上 有1个picture  ,  picture里面有1个image 我用load的方法加载控件  如何让image控件加载到容器picture中

解决方案 »

  1.   


        Dim obj
        Set obj = Controls.Add("vb.image", "img")
        With obj
            .Visible = True
            .Picture = LoadPicture("d:\a.jpg")
            Set .Container = Me.Picture1   '这个属性...
        End With
      

  2.   

    如果你不是动态生成的控件,而是设计时窗体上存在的image,那么在如上代码的基础上,最好还要设置一下left和top属性...
      

  3.   

    你的方法可以实现  但我使用load加载控件数组的 
      

  4.   

    image控件本来就在容器picture中啊
      

  5.   

    一样啊:    Dim n As Long
        Dim x As Long
        
        For n = 1 To 5
            Load Image1(n)
            With Image1(n)
                .Visible = True
                .Picture = LoadPicture("d:\a.jpg")
                Set .Container = Me.Picture1
                .Move x, 0
                x = x + .Width + 10
            End With
      

  6.   

    汗 是我把picture透明了 看不到图片了  还以为不在容器内多谢楼上两位的解答