VB如何将picturebox中的图片插入到word报告中呢？

[DQYDXT]

本人因为工作需要，自己学习vb做了一个粗糙的vb出报表的小程序，但是需要插入图片，但是使用
诸如Selection.InlineShapes.AddPicture FileName:="C:\CommandPicture.jpg" 的方法，插入图片，每次都需要预先
把图片放入桌面，即使是使用app.path也需要把图片放入小程序所在的路径中，所以想在vb源程序中加一个form，form中
单独放一个picturebox，这样源程序中就包括了我需要的图片，但是我怎么将这个图片插入word中呢

[DQYDXT]

引用 2 楼 Runnerchin 的回复:

你的操作逻辑没有捷径，假设你弄了一个picturebox出来，picturebox的图片从哪里来？ 让picturebox去Load一个图片，再从picturebox读图片到word，和直接在word里插入这个图片哪个方便？

您好，感谢您的回复，当然可以直接在word上插入图片，我出一份计算书，然后在word中插入图片当然方便，但是我出10份呢，我的意思是在vb中单独建一个image或者picturebox的容器，预先在image或者picture控件中加载图片，这样使用程序的时候不用去对应的位置找图片，换一台电脑使用程序也可以

[X-i-n]

的确是个办法。 如果一时半会解决不了图片直接从picturebox复制到word的问题，你也可以考虑把图片先保存到C:\windows\Temp，临时目录就是让你这么用的。

[X-i-n]

或者使用资源文件

[DQYDXT]

引用 1 楼 Chen8013 的回复:

应该可以通过“剪贴板”操作吧！ 比如在“画图”、或其它软件如Photoshop、或者屏幕截图软件等， 复制一块“图像”，然后在Word文档中可以直接“粘贴”到光标处的。 那么，在VB中也应该可以先把“图像”放入剪贴板（如果VB自己的“剪贴板对象”不行，就要用API）， 再用“粘贴”的操作方式插入Word。这个“粘贴”肯定也是能用代码执行的。 给你指个思路，楼主自己试下。

谢谢您的回复，已经通过剪切板能都实现在word中插入已存在的picturebox中的图片，但是如何设定图片的大小呢，在word中通过宏录制的方法发现代码，每当宏录制的时候，图片就不可选中了

[舉杯邀明月]

应该可以通过“剪贴板”操作吧！ 比如在“画图”、或其它软件如Photoshop、或者屏幕截图软件等， 复制一块“图像”，然后在Word文档中可以直接“粘贴”到光标处的。 那么，在VB中也应该可以先把“图像”放入剪贴板（如果VB自己的“剪贴板对象”不行，就要用API）， 再用“粘贴”的操作方式插入Word。这个“粘贴”肯定也是能用代码执行的。 给你指个思路，楼主自己试下。

[X-i-n]

你的操作逻辑没有捷径，假设你弄了一个picturebox出来，picturebox的图片从哪里来？ 让picturebox去Load一个图片，再从picturebox读图片到word，和直接在word里插入这个图片哪个方便？

[greatbody]

你是用VBA不就完了吗？应该可以搞定的。