在vb中如何用按钮打开已有PPT文档？
答案:3 悬赏:30 手机版
解决时间 2021-11-13 00:12
- 提问者网友：書生途
- 2021-11-12 03:00
在vb中如何用按钮打开已有PPT文档？
最佳答案
- 五星知识达人网友：行路难
- 2021-11-12 03:38
调用 PowerPoint 打开啊
1、用VB自己的函数 SHELL
Call Shell( "C:\Program Files\Microsoft Office\OFFICE11\POWERPNT.EXE d:\0827.ppt", 1) 这条语句的意思就是用POWERPNT.EXE来打开d:\0827.ppt这个文件。缺点是不能保证这个POWERPNT.EXE在任何机器上都存在，且同一目录。
2、用WINDOWS的函数 ShellExecute 这不是VB自带的函数，所以必须在程序里对这函数进行声明。
Public Declare Function ShellExecute Lib "shell32.dll " Alias "ShellExecuteA " (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
ShellExecute(Me.hwnd, vbNullString, "d:\temp\0827.ppt ", vbNullString, vbNullString, 1)
这个函数并不关心文件被什么程序打开，缺点，如果打开文件的格式和任何程序都没关联起来，这时系统就不知道该如何打开它了（弹出一个“打开方式”对话框）。
1、用VB自己的函数 SHELL
Call Shell( "C:\Program Files\Microsoft Office\OFFICE11\POWERPNT.EXE d:\0827.ppt", 1) 这条语句的意思就是用POWERPNT.EXE来打开d:\0827.ppt这个文件。缺点是不能保证这个POWERPNT.EXE在任何机器上都存在，且同一目录。
2、用WINDOWS的函数 ShellExecute 这不是VB自带的函数，所以必须在程序里对这函数进行声明。
Public Declare Function ShellExecute Lib "shell32.dll " Alias "ShellExecuteA " (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
ShellExecute(Me.hwnd, vbNullString, "d:\temp\0827.ppt ", vbNullString, vbNullString, 1)
这个函数并不关心文件被什么程序打开，缺点，如果打开文件的格式和任何程序都没关联起来，这时系统就不知道该如何打开它了（弹出一个“打开方式”对话框）。
全部回答
- 1楼网友：污到你湿
- 2021-11-12 05:53
二楼正解
- 2楼网友：封刀令
- 2021-11-12 04:29
你应该知道，在window下，在开始菜单里的运行里怎么打开ppt的吧，然后在vb代码里写成批处理，就行了。
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯