求助:怎么用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 , 基础类