Question

VB新手，我现在想做个用VB打开WORD，并在WORD文本框内写入内容“正常”的小程序，怎么写？

我放在程序里跑的怎么是无效的过程或是参数？
在VB中打开一个已经存在的WORD文档，C:\xx.doc。
Private Sub Command1_Click()
Dim ws As Object ’这是什么意思？ws是什么意思。
Set ws = CreateObject("wscript.shell") ’这是什么意思？
MyAppID = Shell("C:\Program Files\Microsoft Office\OFFICE11\WINWORD.EXE", 1) '如果是已经建立的文档呢？
AppActivate MyAppID ' 激活word
Clipboard.SetText "正常"这是文本框的意思吗？
ws.SendKeys "^v" '这个不明白
End Sub

Answer 1

Dim ws As Object
Set ws = CreateObject("wscript.shell")
MyAppID = Shell("C:\Program Files\Microsoft Office\OFFICE11\WINWORD.EXE", 1) ' 运行 Word 你的路径自己写
AppActivate MyAppID ' 激活word
Clipboard.SetText "正常"
ws.SendKeys "^v"

追问

我放在程序里跑的怎么是无效的过程或是参数？
在VB中打开一个已经存在的WORD文档，C:\xx.doc。
Private Sub Command1_Click()
Dim ws As Object ’这是什么意思？ws是什么意思。
Set ws = CreateObject("wscript.shell") ’这是什么意思？
MyAppID = Shell("C:\Program Files\Microsoft Office\OFFICE11\WINWORD.EXE", 1) '如果是已经建立的文档呢？

追答

ws是个变量名，看不出来么?

set ws=就是给这个变量赋值 ws定义为一个对象变量 然后给这个变量赋一个实际的对象 wscript
如果要打开一个文档就写
shell "cmd /c start d:\a.doc"

追问

AppActivate MyAppID ' 激活word
Clipboard.SetText "正常"这是向word中文本框输入的意思吗？
ws.SendKeys "^v" '这个不明白
End Sub
可以和我QQ1605011608联系下吗？
shell "cmd /c start d:\a.doc" '这句也不明白。
你前面给我的程序是可以在WORD里输入内容了，但是我打算是输入到WORD已经有的唯一文本框内。就是如何将VB中text1的内容输入到WORD文本框内。