直接 用 shell "Word.exe"
如果没安装,则 调不出来。
如果没安装,则 调不出来。
解决方案 »
- 使用jcButton按钮控件令程序在2003系统中无法运行!
- 各位大虾,推荐几本好的VB书
- webbrowser 定向到一个URL 时,怎样取消执行里面的脚本,或者在最顶部写入自己的脚本
- 请问不用控件的话,在VB里如何实现文件下载?
- 用VB编写的ActiveX DLL文件在被另外的程序调用,DLL内产生的错误想通过err.raise报告给被调用程序,但是错误报告只能报告错误号码,但说
- 在CryStal Report當中,有沒有選擇打印功能? 一定給分(急........)
- 急切咨询!
- 疑惑!请大虾详细表达一下VB中各种不同作用域的变量的定义方法。
- 关于用vb获得sql登陆用户名的问题,急急
- 我用vb自己编的POP3邮件服务器,希望大家提意见。
- vb中的多行文本框中获得自动文本,怎样把光标放在文本末尾?
- vb中用access数据库为什么有时候明明一条记录也没有但它的recordcount却不为0
Shell Environ("WinDir") & "\explorer.exe " & FolderPathName, vbNormalFocus
但是我如何得到Winword的路径,各位大侠快快伸手救一救啦,小弟真实急死了!!!
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\winword.exe
取这个键的“默认”值就是你要的拉。
Set myWord = New Word.Application '创建 Word 对象
myWord.Visible = False
myWord.Documents.Open "test.doc"
这个方法不行吗?
Declare Function RegQueryValueEx Lib "advapi32.dll" Alias "RegQueryValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal lpReserved As Long, lpType As Long, lpData As Any, lpcbData As Long) As Long
说明
获取一个项的设置值
返回值
Long,零(ERROR_SUCCESS)表示成功。其他任何值都代表一个错误代码
参数表
参数 类型及说明
hKey Long,一个已打开项的句柄,或者指定一个标准项名
lpValueName String,要获取值的名字
lpReserved Long,未用,设为零
lpType Long,用于装载取回数据类型的一个变量
lpData Any,用于装载指定值的一个缓冲区
lpcbData Long,用于装载lpData缓冲区长度的一个变量。一旦返回,它会设为实际装载到缓冲区的字节数 word.exe 的注册表路径如uguess所说在
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\winword.exe
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
Private Sub Command1_Click()
Open "调用Microsoft Word 文档.doc" For Binary As #1
Close #1
ShellExecute Me.hwnd, "Open", "调用Microsoft Word 文档.doc", "", App.Path, 1
End Sub