保存到项目里，然后给单元格赋值。
Dim img As Image = GetImage("d:\test.jpg")
'------------------------
img.Save("d:\test2.jpg")
Tables("表A").Current("第一列") = "test2.jpg"
加好友 
发短信
Post By：2015/8/25 11:26:00 [显示全部帖子]
