Question

VB 操作 word的一个问题！

如何使用vb在一个word文档中插入一个图形对象，我说的是一个对象，就是用VB做好的一个Bitmap对象，不是图形文件，我以前插入图形用InlineShapes.AddPicture()方法，但该方法只支持有路径的图形文件，不支持Bitmap对象。那怎样可以插入一个Bitmap对象呢？
我的程序的用途是改变某个图片的大小到1024*768，然后插入到指定路径的word文档里。
我自己编的过程是这样的：
1、openfile打开一个图片文件
2、新建一个bitmap对象，
3、将打开的图片文件赋值给bitmap
4、设置bitmap对象大小为4024*768
5、将bitmap对象另存为1.jpe文件
6、建立word对象，并打开一指定的word文件
7、使用addpicture()方法，将1.jpg插入到word里。
8、删除1.jpe。
我就是不想bitmap对象另存后，再插入到word文档里，然后还要删除这个文件，以清理磁盘。有什么方法可以直接将bitmap对象插入到word文档里。
我是问有没有更简单的方法？

Answer 1

楼主读入图像的方法就不太好。直接用PICTURN对象.loadpicturn("图片文件路径与文件名")就读入图片了。要缩放的话，应该换用IMAGE控件。然后复制到剪贴板里，再操作VBA WORD对象，在里面从剪贴板里粘贴进图像就可以了。

Answer 2

savepictute 保存图片,再addpicture
或试试用产剪切板粘贴.