中文编程举一反三──用易语言实现用户登录
软件世界
中文编程可能是不少编程爱好者的一个梦想,当我们在记忆各个类的英语事件和方法的时候,是多么希望能有中文来替代实现呀,这样我们就可以按自己的习惯而不用去记忆大量英语来编程了。易语言则率先将这个梦想变成了现实。虽然它还有待进一步完善,但这并不妨碍我们了解它和学习它。下面就是一个简单的例子,让我们看看如何利用易语言来实现用户的登录。
程序界面
首先打开易语言新建一个程序。在启动窗口中放入两个标签分别命名为“用户名”和“密码”,两个编辑框(默认为编辑框1和编辑框2), 两个按钮并命名为“确定”和“取消”,如图1。
输入代码
先将用户名、密码、用户类型加入常量库以方便以后输入及使用,如图2。在启动窗口上双击,进入启动窗口,在创建代码编辑区输入如下内容:
容器 类型 静态 数组 备注 字段 字段信息 3
如果真 (文件是否存在 (“mm数据库.edb”) = 假)
字段1 [1].名称 = #用户名
字段1 [2].类型 = #文本型
字段1 [3].最大文本长度 = 20
字段2 [1].名称 = #密码
字段2 [2].类型 = #文本型
字段2 [3].最大文本长度 = 20
字段3 [1].名称 = #用户类型
字段3[2].类型 = #文本型
字段3 [3].最大文本长度 = 8
注释:如果mm数据库文件不存在,新建数据库文件。
如果真 (创建 (“mm数据库”, 字段1) = 假)
信息框 (“创建密码数据库” + #左引号 + “密码数据库.edb” + #右引号 + “失败!”, #错误图标, “错误”)
结束 ()
注释:如果mm数据库文件没有成功创建,显示错误信息并结束程序。
如果真 (打开 (#mm数据库, , , , , , ) = 假)
信息框 (“无法打开密码数据库” + #左引号 + “密码数据库.edb” + #右引号 + “!”, #错误图标, “错误”)
结束 ()
注释: 密码数据库文件没有被打开,显示错误信息并结束程序。
双击“确定”按钮进入代码编辑区:
容器 类型 静态 数组 备注
次数 整数型 √
运行次数 整数型
置当前库 (“mm数据库”)
到首记录 ()
计次循环首 (取记录数 (),运行次数)
判断 (用户.内容 = “”)
信息框 (“请输入用户名!”, #错误图标, “提示”)
返回 ()
如果真 (读 (1) =编辑框1.内容)
如果 (读 (2) = 编辑框2.内容)
yz = 1
载入(窗口1,,真) 注释:载入程序的其他窗口。
如果 (次数≠ 2)
信息框 (“密码错误!”, #错误图标, “提示”)
次数=次数+ 1
返回 ()
信息框 (“非法用户,禁止进入本系统!”, #错误图标, “警告!”)
结束 ()
注释:连续输入密码错误3次显示错误信息并结束程序(前边的“次数”一定要设置为静态,否则此处功能就不能实现。)
跳到 (取记录号 () + 1)
计次循环尾 ()
判断 (yz ≠ 1)
注释:找不到所输入用户名显示错误信息。
信息框 (“无此用户!”, #错误图标, “提示”)
双击“取消”按钮(按钮2)进入代码编辑区:
全部关闭 () (关闭所有打开的易数据库)
销毁 () (关闭所有窗口,结束程序)
小结
通过一个简单的例子,大家想必对中文编程有所了解了吧。其实和英文编程相比,中文编程在表达上并无太大区别。有了这个例子做基础,读者就可以尝试去编出更多的应用程序了,希望大家能够举一反三。以上代码在Win2000/XP加易语言3.5中测试通过。
易语言下载地址:http://www.dywt.com.cn/download.asp/。
