图片框读入图片和EXCEL及添加图片

图片框读入图片和EXCEL及添加图片开源。
.如果 (图片框1.图片 ＝ 读入文件 (取运行目录 () ＋ “\PIC” ＋ “\” ＋ 编辑框1.内容 ＋ “.jpg”))
Excel工作簿1.添加图片 (取运行目录 () ＋ “\PIC” ＋ “\” ＋ 编辑框1.内容 ＋ “.jpg”, 假, 真, 15, 15, 160, 160)
.否则
Excel工作簿1.添加图片 (“”, 假, 真, 20, 20, 160, 160)
.如果结束
Excel工作簿1.保存 (取运行目录 () ＋ “\生成的文件” ＋ “\” ＋ 编辑框1.内容 ＋ “sc.xls”)
透明标签_EXCEL生成地址.标题 ＝ 取运行目录 () ＋ “\生成的文件” ＋ “\” ＋ 编辑框1.内容 ＋ “sc.xls”
信息框 (“已生成EXCEL文件成功了！！！”, #信息图标, “成功：”, )