易数据库操作功能，含多条件查询

.如果真 (加记录 (编辑框_姓名.内容, 选择 (组合框_性别.内容 ＝ “男”, 真, 假), 到字节 (编辑框_年龄.内容), 编辑框_电话号码.内容, 到时间 (时间到文本 (日期框_出生日期.今天, #日期部分))) ＝ 假)
信息框 (“添加数据失败,原因是:” ＋ 取错误信息 (), 0, , )
返回 ()
.如果真结束
子程序_显示数据库内容 ()

.如果真 (编辑框_数据库名.内容 ＝ “”)
信息框 (“请输入数据库名称”, 0, , )
返回 ()
.如果真结束
.如果真 (创建 (取运行目录 () ＋ “\” ＋ 编辑框_数据库名.内容 ＋ “.edb”, 局部_字段信息) ＝ 假)
信息框 (“数据库创建失败,原因是:” ＋ 取错误信息 (), 0, , )
返回 ()
.如果真结束
_启动窗口.标题 ＝ “数据库创建成功”