📄 21637.html
字号:
<html> <head> <title>GetObject 配合 On Error</title> </head> <body bgcolor="#FFFFFF" vlink="#808080"> <center> <h1>GetObject 配合 On Error</h1> </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by <a href="mailto:ask@vbqa.com">小吴</a> on November 26, 1999 at 19:29:27:<p>In Reply to: <a href="21619.html">VB如何侦测word97已开启?而不用再creatobject?</a> posted by susan on November 26, 1999 at 10:00:58:<p>On Error Resume Next<br>Set objWord = GetObject(, "Word.Application")<br>If Err Then<br> Set ObjWord = CreateObject("Word.Application")<br>End If<br>On Error Goto 0<br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 21637--></ul><!--end: 21637--><br><hr size=7 width=75%><p></body></html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -