📄 9590.html
字号:
<html>
<head>
<title>Re: 我写个范例,你参考看看</title>
</head>
<body bgcolor="#FFFFFF" vlink="#808080">
<center>
<h1>Re: 我写个范例,你参考看看</h1>
</center>
<hr size=7 width=75%>
<hr size=7 width=75%><p>
Posted by <a href="mailto:cjcstephen@hotmail.com">小白痴</a> on January 27, 1999 at 08:04:19:<p>
In Reply to: <a href="9585.html">我写个范例,你参考看看</a> posted by yeong huann on January 26, 1999 at 18:27:12:<p>
: Dim objWord As Object<p>: Private Sub Command1_Click()<br>: objWord.Visible = True<br>: objWord.ActiveWindow.Close<p>: objWord.Documents.Open FileName:=Me.Text1.Text '填入欲开启的word档的路径及档名<p>: End Sub<p>: Private Sub Form_Load()<br>: Set objWord = CreateObject("Word.Application")<br>: objWord.Documents.Add<br>: <p>: End Sub<p>谢谢你!
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 9590-->
<!--top: 9592--><li><a href="9592.html">Re: 可否再完美一点</a> <b>Lai</b> <i>08:37:30 1/27/99</i>
(<!--responses: 9592-->1)
<ul><!--insert: 9592-->
<!--top: 9619--><li><a href="9619.html">Re: 可否再完美一点</a> <b>yehu@tpts6.seed.net.tw</b> <i>02:51:38 1/28/99</i>
(<!--responses: 9619-->0)
<ul><!--insert: 9619-->
</ul><!--end: 9619-->
</ul><!--end: 9592-->
</ul><!--end: 9590-->
<br><hr size=7 width=75%><p>
</body></html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -