当前位置:编程学习 > VB >>

求助:怎么用VB输出图形到Word文档,急!

想用VB输出图形到Word文档,怎么输出呢,查不到,大家帮个忙把,谢了。 --------------------编程问答--------------------
'Word文档插入图片
Option Explicit

Private Sub Command1_Click()
        Dim wordApp As Object
        Dim wordDocument As Object
        Set wordApp = CreateObject("word.application")
        Set wordDocument = wordApp.Documents.Open("D:\插入图片测试.doc", , False) '只读打开
        wordDocument.Shapes.AddPicture "D:\bliss.jpg", True, True
        wordApp.ActiveWindow.WindowState = 1
        wordApp.Application.Visible = True
End Sub
补充:VB ,  基础类
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,