下你所需,载你所想!
汇集开发技术源码资料

易数据库的应用照着教材写的

:4.32KB :1 :2020-01-13 15:41:07

部分简介

.如果真 (文件是否存在 (取运行目录 () + “/” + #员工表) = 假)
.如果真 (信息框 (“员工表不存在,是否创建数据库!”, #询问图标 + #是否钮, ) = #否钮)'有些命令还不是很懂,并且有些功能还没完善,因为有些命令还是没有弄懂,这个对我来说还是有些难啊。
信息框 (“系统将会退出!”, #错误图标, )
结束 ()
.如果真结束
字段表 [1].名称 = #姓名
字段表 [1].类型 = #文本型
字段表 [1].最大文本长度 = 8
字段表 [2].名称 = #性别
字段表 [2].类型 = #逻辑型
字段表 [3].名称 = #年龄
字段表 [3].类型 = #整数型
字段表 [4].名称 = #出生日期
字段表 [4].类型 = #日期时间型
字段表 [5].名称 = #工资
字段表 [5].类型 = #小数型
字段表 [6].名称 = #奖金
字段表 [6].类型 = #小数型
.如果真 (创建 (取运行目录 () + “\” + #员工表, 字段表) = 假)
信息框 (“创建员工表数据库失败!”, #错误图标, “错误”)
结束 ()
.如果真结束
信息框 (#左引号 + #员工表 + #右引号 + “数据库创建成功!”, #信息图标, )

.如果 (写字段 (#姓名, , 编辑框_姓名.内容) 且 写字段 (#性别, , 选择 (组合框1.现行选中项 = 0, 真, 假)) 且 写字段 (#年龄, , 到整数 (编辑框_年龄.内容)) 且 写字段 (#出生日期, , 取日期 (日期框1.今天)) 且 写字段 (#工资, , 到数值 (编辑框_工资.内容)) 且 写字段 (#奖金, , 到数值 (编辑框_奖金.内容)))
信息框 (“添加记录成功”, 0 + #信息图标, “成功”)
_按钮3_被单击 ()
销毁 ()
.否则
信息框 (“添加记录失败”, 0 + #信息图标, “失败”)

易数据库的应用照着教材写的

热门推荐

相关文章