 |
可以使用API的ShellExecute函数来实现打开文件。如:
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hwnd As Long, ByVal lpszOp As String, _
ByVal lpszFile As String, ByVal lpszParams As String, _
ByVal LpszDir As String, ByVal FsShowCmd As Long) _
As Long
Const SW_SHOW = 5
Private Sub Command1_Click()
ShellExecute 0, "Open", "c:\word\mywor.doc", "", "", SW_SHOW
End Sub
yangshengquan
操作系统: win98
编程工具: vb6.0
问题: 亲爱的主持人,你好。我是VB6.0的初级用户,我想请问一个问题:我用vb6.0做一个多媒体演示稿,我想在一个窗体上放几幅图片,当点击其中一幅时,就会ACDsee打开,并保证当它打包后拿到其他计算机上也能正常演示,请问怎样实现?万分感谢!
水平: 刚入门
答:使用上面介绍的这个函数就可以,但需要注意两个问题:
1、机器中必须已经安装了ACDSee。
2、不要使用固定的路径,如
ShellExecute 0, "open", "C:\mypath\a.gif", ...
因为这样的话,你的软件就必须安装在C:\mypath,那么就不方便了。你可以使用:
ShellExecute 0, "open", App.Path + "\a.gif", ...
这样只要把图片和EXE放在同一个目录就可以了。
相关问题:
QA000533 "如何建立文件关联"
此问题由李海回答。
附加关键字:编程, 源程序, programming, source code, Visual Basic, VB, 磁盘、文件和目录, disk, file, fat, directory, folder。
|