你好，问一下关于VB中commondialog的用法问题

是用vb6.0吗？？ 如果是的话，你看看是不是想完成下面代码的功能，
窗体上添加 command1 Picture1 CommonDialog1 text1 四个控件 代码如下
Private Sub Command1_Click()
CommonDialog1.FileName = ""
CommonDialog1.ShowOpen
If CommonDialog1.FileName <> "" Then
Text1 = Text1 & "--" & Space(1) & Dir(CommonDialog1.FileName)
End If
Picture1 = LoadPicture(CommonDialog1.FileName)
End Sub

Private Sub Form_Load()

Command1.Caption = "打开文件"
Text1 = "文件名称"
CommonDialog1.Filter = "All Files(*.*)|*.*|JPEG Images(*.jpg;*.jpeg)|*.jpg;*.jpeg|"
End Sub

CommonDialog_openims.Filter = "JPEG Images(*.jpg;*.jpeg)|*.jpg;*.jpeg|"
这样 就好了

monDialog的属性，那摩你先打开msdn然后在左边的标签中找到“索引”然后在里面输入
”CommonDialog“就可以看见那个控件了，然后点击回车就在右边显示出详细的描述了。在描述中的最上面就有属性，然后点击就看见了。

为了让你更清楚我可以把我做的切图发到我的空间里，你可以去看看。

这是地址：

看见图片后再放大一下才看的清楚。