Question

vb怎么用代码添加图片框

Answer 1

 Private WithEvents Image1 As Image'//要响应事件代码
 '// 新建代码，可以放到command_click 或者 form_load 事件中
    Set Image1 = Me.Controls.Add("vb.image", "image")
    With Image1               '//下面是各个属性
        .Left = 120
        .Top = 150
        .Picture = Form1.Icon 
        .Width = 255
        .Height = 255
        .Stretch = True
        .Visible = True
    End With