㈠ vb中如何在word文檔中插入圖形文件
Dim MyWord As Object
Dim NewDoc As Object
Set MyWord = CreateObject("Word.Application") '創建一個word對象
M = App.Path & "\123.doc"
Set NewDoc = MyWord.Documents.Open(M)
Clipboard.Clear '清除剪貼板
Clipboard.SetData Picture1.Picture 'vbCFBitmap 圖片框中圖片裝入剪貼板
MyWord.Selection.TypeText "123" & "." & vbCr '換行
MyWord.Selection.Paste '將剪貼板中的圖像復制到Word文檔中
MyWord.Selection.TypeText (vbCrLf) '換行
NewDoc.Content.InsertAfter "123" & "." & vbCr
Set NewDoc = Nothing
Set MyWord = Nothing '清除對象
㈡ 怎樣用VB打開word文件，並插入一個圖片到該word文件
遲了一步，但不過還是貼點東西過來，要不然剛才花那麼多時間白研究了
先在工程引用microsoft word
Option Explicit
Dim WithEvents WordApp As Word.Application
Dim WithEvents WordDoc As Word.Document
Private Sub Command1_Click()
Set WordApp = New Word.Application
WordApp.Visible = True
WordApp.Documents.Add
WordApp.ActiveDocument.Shapes.AddPicture "C:\WINNT\CIBA1B.bmp"
如果要保存成你定下的名字就用WordApp.ActiveDocument.Saveas……
㈢ VB中的圖像如何運用windows的剪貼板粘貼到WORD
在VB中運用Windows剪貼板將圖像粘貼至Word，首先需按下"alt + PRINTSCREEN"鍵截取當前活動窗口。與樓上的方法不同，這里採用的是捕捉活動窗口的一部分而非整個屏幕。接著，打開附件中的畫圖程序，利用其中的選定工具，通常是一個矩形形狀的工具，選中你想要使用的圖像區域。完成選區後，可以通過復制或粘貼功能，將選中的圖像內容轉移至Word文檔中。
在復制過程中，確保已經選中了圖像區域。使用Ctrl + C組合鍵執行復制操作。然後，切換到Word文檔中，通過點擊右鍵選擇「粘貼」選項，或使用快捷鍵Ctrl + V來將圖像粘貼至文檔內。在粘貼過程中，確保Word文檔處於活動狀態，以確保圖像正確地插入並顯示在文檔中。
在使用過程中，可能需要調整圖像大小或位置以適應文檔布局。可以通過點擊插入的圖像，然後使用滑鼠拖動來調整圖像的大小，或點擊圖像周圍的小正方形按鈕調整圖像位置。此外，還可以使用「圖片工具」中的各種選項來進一步編輯圖像，如旋轉、裁剪或添加文本等。
使用Windows剪貼板將圖像粘貼至Word的流程簡單高效，能夠快速將圖像整合至文檔中。通過上述步驟，可以輕松地在VB環境下將圖像運用至Word文檔中，以滿足不同需求。此方法適用於多種場景，如文檔插圖、報告製作等。