vb6中word编程总结
点击次数：61 次 发布日期：2008-11-06 08:06:27 作者：源代码网
源代码网推荐 源代码网推荐2, 启动word 源代码网推荐 Dim wApp As Word.Application 源代码网推荐 Set wApp = New Word.Application 源代码网推荐 wApp.Visible = True 源代码网推荐 关闭word 源代码网推荐 wApp.Quit 源代码网推荐 Set wApp = Nothing 源代码网推荐 源代码网推荐3, 打开文件 源代码网推荐 Set wDoc = Documents.Add （新建） 源代码网推荐 ActiveDocument.SaveAs Text1.Text （保存） 源代码网推荐 Set wDoc = Documents.Open(FileName:=Text1.Text) （打开指定文件） 源代码网推荐 源代码网推荐以上的Documents 和 ActiveDocument 均是word object 中的已实例化了的对象，即不用set obj=new obj即可以使用的对象. 就像vb中的app、debug、err等对象， 源代码网推荐文件打开之后，获取光标所在位置mySelection即可给文件添加各种数据（文本，图像，表格等等，） 源代码网推荐 源代码网推荐4，插入文本 源代码网推荐 源代码网推荐 Dim mySelection As Word.Selection 源代码网推荐 Set mySelection = Documents.Application.Selection 源代码网推荐"注意上面的这两行代码，只要有这两行代码，就可以使用所有的word中的宏操作。以下的代码就是从宏中拷过来的。 源代码网推荐 With mySelection 源代码网推荐 .InsertAfter Text1.Text & vbCrLf 源代码网推荐 .Font.Name = "楷体_GB2312" 源代码网推荐 .Font.Size = 16 源代码网推荐 .ParagraphFormat.Alignment = 1 源代码网推荐 End With 源代码网推荐"这里有必要提到宏（macro）在word编程的重要性，几乎所有的word操作，只要你能够通过word可以实现，就可以编程实现 源代码网推荐 源代码网推荐5，插入图像 源代码网推荐 Documents.Application.Selection.InlineShapes.AddPicture text1.text 源代码网推荐 源代码网推荐6，插入表格 源代码网推荐因为excel中处理表格的能力要比word的处理能力要强，所以可以在excel中生成了表格之后再复制到word当中 源代码网推荐 源代码网推荐 源代码网推荐 源代码网推荐 源代码网供稿. |
