VB中如何生成一个WORD文档(有图)
图片地址http://www.ylmf.net/read.php?tid=1202717这个是写好的一个VB程序如何用VB生成一个WORD文档啊...
图片地址http://www.ylmf.net/read.php?tid=1202717
这个是写好的一个VB程序
如何用VB生成一个WORD文档啊 展开
这个是写好的一个VB程序
如何用VB生成一个WORD文档啊 展开
3个回答
展开全部
程序采用VB编程实现,需要机器安装有VB应用程序及Microsoft Office组件。打开VB,新建一个VB工程,取名Proc_Word,将启动窗体命名为FrmMain,选择“工程”菜单中的“引用”,在“引用”对话框中选择 “Microsoft Word8.0 Object Library”(这一步很重要,你必须选择这一ActiveX部件,否则代码不能正确运行,顺便说一句,如果安装的是Office2000,那么应该选择“Microsoft Word9.0 Object Library”)。同时在“工程”菜单中“部件”对话框中选择添加“Microsoft Windows common controls -2.5(sp2)”,以便在窗体设计中可以使用微调控件。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
博思aippt
2024-07-20 广告
2024-07-20 广告
作为深圳市博思云创科技有限公司的工作人员,对于Word文档生成PPT的操作,我们有以下建议:1. 使用另存为功能:在Word中编辑完文档后,点击文件->另存为,选择PowerPoint演示文稿(*.pptx)格式,即可将文档内容转换为PPT...
点击进入详情页
本回答由博思aippt提供
展开全部
Imports Word
‘打开
Dim mWordapp As Word.Application ‘word 应用程序
Dim mobjDoc As Word.Document ’word 文档
Dim fullFileName as string ‘文件路径
mWordapp = CreateObject(”Word.Application”)
mobjDoc = mWordapp.Documents.Add(FullFileName)
‘关闭
Dim missing As Object = System.Reflection.Missing.Value
mWordapp.Application.Quit()
If Not mobjDoc Is Nothing Then
‘垃圾回收
System.Runtime.InteropServices.Marshal.ReleaseComObject(mobjDoc)
mobjDoc = Nothing
End If
If Not mWordapp Is Nothing Then
System.Runtime.InteropServices.Marshal.ReleaseComObject(mWordapp)
mWordapp = Nothing
End If
‘真正释放word进程
GC.Collect()
学习更多教程,请浏览: VB.NET入门教程 雄网
‘打开
Dim mWordapp As Word.Application ‘word 应用程序
Dim mobjDoc As Word.Document ’word 文档
Dim fullFileName as string ‘文件路径
mWordapp = CreateObject(”Word.Application”)
mobjDoc = mWordapp.Documents.Add(FullFileName)
‘关闭
Dim missing As Object = System.Reflection.Missing.Value
mWordapp.Application.Quit()
If Not mobjDoc Is Nothing Then
‘垃圾回收
System.Runtime.InteropServices.Marshal.ReleaseComObject(mobjDoc)
mobjDoc = Nothing
End If
If Not mWordapp Is Nothing Then
System.Runtime.InteropServices.Marshal.ReleaseComObject(mWordapp)
mWordapp = Nothing
End If
‘真正释放word进程
GC.Collect()
学习更多教程,请浏览: VB.NET入门教程 雄网
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
dim
wordapp
as
new
word.application
dim
mydoc
as
word.document
wordapp.documents.add()
mydoc
=
wordapp.activedocument
wordapp.visible
=
true
命名空间
interop.word
interop.microsoft.office.core
wordapp
as
new
word.application
dim
mydoc
as
word.document
wordapp.documents.add()
mydoc
=
wordapp.activedocument
wordapp.visible
=
true
命名空间
interop.word
interop.microsoft.office.core
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询