picture控件或是picture box 控件用法？

[lovetsfuer]

我要在picture控件或是picture box 控件上放一个文件夹的图片，这个图片指向一个CommonDialog控件，点图片进入文件夹选择文件，是用picture控件或是picture box 控件，谁能给说下，用到那个属性，谢谢。

[熊孩子开学喽]

sub picture1_click()
Dim FN as string
Commondialog1.filter="*.jpg|*.JPG,*.bmp|*.bmp"
CommonDialog1.ShowOpen
FN=Commondialog1.filename
if FN <>"" then Picture1.Picture=loadpicture(FN)
End Sub
就是这样了

[熊孩子开学喽]

如果点击PICTURE就弹出打开文件对话框，可以选择一个BMP或JPG然后加载到PICTURE控件里

[lovetsfuer]

好的谢谢。

[hotoo129]

试试看~~~