.版本 2 .程序集 窗口程序集1 .程序集变量 edb, MyEDB .子程序 __启动窗口_创建完毕 .局部变量 path, 文本型 .局部变量 i, 整数型 .局部变量 temp, 文本型, , "0" .局部变量 int, 整数型 .局部变量 int1, 整数型 path ＝ 取运行目录 () ＋ “\myedb.edb” .判断开始 (文件是否存在 (path)) edb.打开 (path, “hellokity”) .默认 edb.创建 (path, “hellokity”) .判断结束 输出调试文本 (edb.取错误原因_文本型 (edb.GetLastError ())) .子程序 _按钮1_被单击 edb.添加数据段 (“Website”) edb.添加数据 (“Website”, 到字节集 (“http:\\www.qq.com”)) edb.保存数据库 () .子程序 _按钮2_被单击 信息框 (到文本 (edb.读取数据 (“Website”)), 0, ) .子程序 _按钮3_被单击 edb.修改数据 (“Website”, { }) .子程序 _按钮4_被单击 edb.置本地操作数据库 () 信息框 (“切换本地模式”, 0, ) .子程序 _按钮5_被单击 edb.关闭本地对象 ()