以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  WordCreator中无法插入照片  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=195832)

--  作者:夏许多雪
--  发布时间:2025/3/12 19:44:00
--  WordCreator中无法插入照片
如题,在WordCreator编程中,无法用AddPicture(image, align)插入图片。打开Casestudy中的基本功能演示,按帮助文件在命令窗口中运行,也没有出现照片。请问是什么原因。
--  作者:有点蓝
--  发布时间:2025/3/13 8:52:00
--  
我测试没有问题。是不是图片的路径不对?
--  作者:狐狸爸爸
--  发布时间:2025/3/13 9:01:00
--  
你是用wps打开吧,wps存在兼容性问题,你可以用word打开,或者将文件发给wps官方,说在word能正常显示图片,在wps不行
--  作者:夏许多雪
--  发布时间:2025/3/14 22:23:00
--  
是用wps打开的,没有显示图片,今天重新试了一下,用word打开没问题,应该是wps 的兼容性问题吧。
--  作者:夏许多雪
--  发布时间:2025/3/14 22:37:00
--  
再问一下,用wordcreator能在一个表格单元格内插入两张及以上图片吗。如能插入代码怎么写?如下图

图片点击可在新窗口打开查看此主题相关图片如下:一个单元格内插入两张照片.png
图片点击可在新窗口打开查看


--  作者:有点蓝
--  发布时间:2025/3/15 9:27:00
--  
连续添加呀

Dim img As Image = GetImage(dr("照片"))
Dim
 pic As New Word.Objects.RtfPicture(img)
pic.Height = 120
tb.Rows(0).Cells(4).Content.Add(pic)

img = GetImage(dr("照片2"))
pic= New Word.Objects.RtfPicture(img)
pic.Height = 120
tb.Rows(0).Cells(4).Content.Add(pic)

--  作者:夏许多雪
--  发布时间:2025/3/16 13:38:00
--  
OK,可以的,谢谢了。