设计一个程序,用VB打开WORD文档,并对其进行修改保存?
5个回答
2013-08-23
展开全部
首先你要在VB的“工程”->“引用”中引用“Microsoft Word 9.0 Object LibraryPrivate Sub Command1_Click()'打开指定的Word文件
Dim wdApp As Word.Application
Dim aDoc As Document
Set wdApp = New Word.Application
Set aDoc = wdApp.Documents.Open(FileName:="你要打开的Word文件路径及文件名")
wdApp.Visible = True'设置Word对象可见
End Sub
不过你要关闭word文件时要释放对象
aDoc.Close'关闭文件
wdApp.Quit'退出Word程序
Set aDoc = Nothing'释放对象
Set wdApp = Nothing
你可以再放一个按钮,将上面代码放进去,用这个按钮来关闭Word并释放对象。
如果你直接在Word程序中关闭文件的话,就将word对象定义在一个类模块中Public WithEvents wdApp As Word.Application,再在wdApp_Quit()事件中加入释放对象的代码。
如果关闭word文件而没有释放对象的话,你只有重新运行刚才用来打开word文件的程序才能再次打开word文件。
Dim wdApp As Word.Application
Dim aDoc As Document
Set wdApp = New Word.Application
Set aDoc = wdApp.Documents.Open(FileName:="你要打开的Word文件路径及文件名")
wdApp.Visible = True'设置Word对象可见
End Sub
不过你要关闭word文件时要释放对象
aDoc.Close'关闭文件
wdApp.Quit'退出Word程序
Set aDoc = Nothing'释放对象
Set wdApp = Nothing
你可以再放一个按钮,将上面代码放进去,用这个按钮来关闭Word并释放对象。
如果你直接在Word程序中关闭文件的话,就将word对象定义在一个类模块中Public WithEvents wdApp As Word.Application,再在wdApp_Quit()事件中加入释放对象的代码。
如果关闭word文件而没有释放对象的话,你只有重新运行刚才用来打开word文件的程序才能再次打开word文件。
2013-08-23
展开全部
Shell "C:\Program Files\Microsoft Office\OFFICE11/WINWORD.EXE F:\××\××.doc"
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
运行你vb程序,然后使用alt+printscrm方法截图,粘贴与画图板,取名保存。在word按来自文件方式插入该图片
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-08-23
展开全部
如,标签点击事件 添加个Shell 函数 就行了
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-08-23
展开全部
vb啊!!!天啊……还再学习啊!!!你的问题要多一点知识……我学会再告诉你!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询