Question

vb编程 加入图像框，单击图像框时，在图像框中加入一张图片（图像框大小不能改）。

Answer 1

1.在from中添加 picture 控件
2.在from中添加CommonDialog 控件
3.添加下面 代码.
这样就可以实现自动选择图片显示的哦~~ 给分哦 亲~~
Private Sub Picture1_Click()
Dim xlslu As String
CommonDialog1.Filter = " .jpg|*.jpg"
CommonDialog1.ShowOpen
xlslu = CommonDialog1.FileName
If xlslu <> "" Then
Picture1.Picture = LoadPicture(xlslu)
End If
End Sub

Answer 2

Private Sub Picture1_Click()
Picture1.PaintPicture "a.gif", 0, 0
End Sub