中文编程举一反三──用易语言实现用户登录

软件世界

  中文编程可能是不少编程爱好者的一个梦想,当我们在记忆各个类的英语事件和方法的时候,是多么希望能有中文来替代实现呀,这样我们就可以按自己的习惯而不用去记忆大量英语来编程了。易语言则率先将这个梦想变成了现实。虽然它还有待进一步完善,但这并不妨碍我们了解它和学习它。下面就是一个简单的例子,让我们看看如何利用易语言来实现用户的登录。

  程序界面

  首先打开易语言新建一个程序。在启动窗口中放入两个标签分别命名为“用户名”和“密码”,两个编辑框(默认为编辑框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/。