vb.net - 替换word文件中的图片

Question

我想替换 word 文件中的图像。我在输入图片的时候遇到了一个问题，就是用文本内容替换所有的单词，改变单词的位置。

我所做的是为图像添加书签并添加图像。

- 我想要的是用word文件替换图像而不删除任何内容，并且图像来自数据表而不是图像文件

我的代码

Dim aplication As New Microsoft.Office.Interop.Word.Application

Dim myapp1 As New Application
Dim filename = "path file"
Dim mydoc As New Document
mydoc = aplication.Documents.Open(filename)
Dim bk As Bookmarks = mydoc.Bookmarks

bk("pic").Range().InlineShapes.AddPicture(
FileName:="path file\Image.jpeg", LinkToFile:=False,
SaveWithDocument:=True)

mydoc.InlineShapes(1).Height = 100.5
mydoc.InlineShapes(1).Width = 100.14

GC.Collect()
GC.WaitForPendingFinalizers()
GC.Collect()
GC.WaitForPendingFinalizers()

标签： vb.net