点击打开图片的VB代码怎写

Lee　发表于：2010-06-26 17:35:32 　

我现时绑定图片路径后在窗体中能正常显示图片，但我还想点击能打开，不知代码要怎样写，我现时绑定路径的图像控件代码是：

Private Sub Form_Current()
On Error Resume Next
Me!Image37.Picture = Me!产品图示

End Sub

有劳指点。

煮江品茶发表于：2010-06-26 20:28:51

打开文件（包括图片文件）可以以下语句：

if Shell("explorer.exe " & "带路径文件名称", vbNormalFocus)=0 then exit sub

Lee 发表于：2010-06-28 20:46:48

煮江品茶先生能说明白些吗？请问“带路径文件名称”是什么意思？

wyh99999 发表于：2010-06-29 21:00:08

就是"产品图示"图片文件所在的目录与文件名称

Lee 发表于：2010-06-29 21:50:06

图像控件已绑定图片路径，即每张图片路径和名称不一样，怎样写啊？我是想除了能在窗体中显示产品图片外，还能点击打开图片看细节。

wyh99999 发表于：2010-06-29 22:01:44

wyh99999 发表于：2010-06-29 22:04:13

Lee 发表于：2010-06-30 14:50:27

还是按照煮江品茶方法，代码：

if Shell("explorer.exe " & me.产品图示.value, vbNormalFocus)=0 then exit sub

总记录：7篇页次：1/1 9 1 :

Access交流中心