.版本 2 .支持库 iext .子程序 _添加按钮_被单击 .局部变量 SQL, 文本型 .如果真 (添加按钮.标题 ＝ “我要添加”) 清内容 () 添加按钮.标题 ＝ “添加” 返回 () .如果真结束 .如果真 (中文名编辑框.内容 ＝ “” 或 英文名编辑框.内容 ＝ “” 或 性别编辑框.内容 ＝ “” 或 场上编号编辑框.内容 ＝ “” 或 图片框1.图片 ＝ 到字节集 (0)) 信息框 (“请输入必填内容”, 0, ) 返回 () .如果真结束 SQL ＝ “INSERT INTO 明星 ([中文名],[英文名],[性别],[国籍],[出生城市],[出生日期],[身高],[体重],[场上位子],[场上编号],[所属团队],[曾效力团队],[简介],[照片],[快照]) VALUES ('” ＋ 中文名编辑框.内容 ＋ “','” ＋ 英文名编辑框.内容 ＋ “','” ＋ 性别编辑框.内容 ＋ “','” ＋ 国籍编辑框.内容 ＋ “','” ＋ 城市编辑框.内容 ＋ “','” ＋ 日期编辑框.内容 ＋ “','” ＋ 身高编辑框.内容 ＋ “','” ＋ 体重编辑框.内容 ＋ “','” ＋ 位子编辑框.内容 ＋ “','” ＋ 场上编号编辑框.内容 ＋ “','” ＋ 团队编辑框.内容 ＋ “','” ＋ 效力编辑框.内容 ＋ “',?,?,?)” .如果 (外部数据库1.执行 (SQL, 简介编辑框.内容, 图片框1.图片, 快照 (图片框1.取窗口句柄 (), 56, 64))) 信息框 (“添加已成功,击确定继续！”, 64, “成功了”) 超级列表框1.全部删除 () 置图片 () 添加按钮.标题 ＝ “我要添加” .否则 信息框 (“添加失败，请检查！”, 16, “失败了”)