191问答库 > VB 6.0中如何使用CommonDialog控件选择电脑中D盘的图片加载在picturebox控件中？？

VB 6.0中如何使用CommonDialog控件选择电脑中D盘的图片加载在picturebox控件中？？

2025-03-11 09:07:45

推荐回答（1个）

回答1：

示例代码如下：
Private Sub Command1_Click()
    CommonDialog1.Filter = "图片文件(*.jpg;*.gif)|*.jpg;*.gif" '设置过滤器，可添加其它图片格式，但Picture控件不支持png图片
    CommonDialog1.ShowOpen
    CommonDialog1.Flags = &H8 '强制将对话框打开时的目录置成当前目录
    If CommonDialog1.FileName = "" Then Exit Sub
    Picture1.Picture = LoadPicture(CommonDialog1.FileName)
End Sub