我尝试过使用几种方法来保存图像，一种方法是使用二进制代码。问题是它在文件名中保存了一些隐藏的字符，然后文件变得时髦，唯一可以打开它的程序是mspaint，当我尝试重新保存文件时，默认情况下要保存图片为* heic格式。
任何人都对如何将Word中的inlineshape保存到桌面有任何想法。
```
Open strOutFileName For Binary Access Write As #1
i = i + 1
vData = shapeCurrent.Range.EnhMetaFileBits
lWritePos = 1
'put writes to the file that has been created
Put #1, lWritePos, vData
Close #1
```