Question

我的程序会生成一个图像列表（这些图像的数量可能会发生变化）。我想将这些图像对象放在我的应用程序的预览页面中，准备打印。

我已经尝试过这种方式：How to insert image object as picture in word document 不幸的是建议的解决方案

Dim rng As Word.Range = oDoc.Range(int1, int2)
Dim img As Image = qrGen.generateQRcodeImage("desiredInfoToEncloseInQRcode")
Clipboard.SetImage(img)
rng.Paste()

在第三行返回编译错误：

it's not possibile to cast Image in Image

我不需要使用Word文档，所以，如果你能建议我一个更好的解决方案，我会很高兴听你的。

感谢您的时间。

Answer 1

看起来这里只是很难将图像转换为位图。将img转换为位图，然后将其传递给SetImage（）

    Dim rng As Word.Range = oDoc.Range(int1, int2)
    Dim img As Image = qrGen.generateQRcodeImage("desiredInfoToEncloseInQRcode")
    Dim bmpImage as new Drawing.Image(img)
    Clipboard.SetImage(bmpImage)
    rng.Paste()

如何使用图像列表创建文档预览

1 个答案: