读书人

简单的操作word的代码。

发布时间: 2012-04-06 12:22:24 作者: rapoo

求一个简单的操作word的代码。。
只是要求
在d盘创建一个word
然后写入几个字例如 "123123"
然后保存退出。。。。。。

在网上找了好多资料 都太复杂了 看不懂唉。。。。。。。。。。。。

[解决办法]
Private Sub Command1_Click()
Dim W As Word.Application
Dim D As Word.Document
Dim P As Paragraph

Set W = CreateObject("Word.Application")
Set D = W.Documents.Add()
Set P = D.Paragraphs.Add
P.Range.Text = "123123"

D.SaveAs "D:\Test.doc"
D.Close
W.Quit
End Sub

[解决办法]
http://download.csdn.net/detail/veron_04/1627134

读书人网 >VB

热点推荐