3、 用户登录模块
显示用户登录窗口，在窗口中有两个文本输入框和两个Button按钮。两个文本输入框分别接受用户名和密码的输入，并放入全局变量gs_user_code和局部变量ls_user_password中。两个Button按钮分别是确认和取消按钮。当用户单击取消按钮时，关闭登录窗口，返回值0。当用户单击确认按钮时，进行身份验证，如果身份验证成功，关闭登录窗口，返回值1；如果身份验证不成功，提示错误信息，要求用户重新输入。
以下是确认按钮的Clicked事件的部分代码：
//根据输入的用户名从数据库中读取密码
select password into :ls_pswd from sys_opt where code_opt=:gs_user_code;
//如果密码是空值，则改为空字符串
if isnull(ls_pswd) then ls_pswd=''
if ls_pswdls_user_password then
//密码不匹配
messagebox('提示信息','用户名或口令错误！',Exclamation!)
return
----------------------------------------------------------
还要加个用户名和密码的登记和修改！
列更改按扭CLICKED事件中执行下列语句： --修改用户名： UPDATE sys_opt SET code_opt=:newgs_user_code where code_opt=:gs_user_code and password=:ls_pswd --修改密码 UPDATE sys_opt SET password=:newls_pswd where code_opt=:gs_user_code and password=:ls_pswd===============说明什么呢？就是说，在更改密码或用户名以前，要知道旧用户名和旧密码，需要给用户增加两个控件，用来在输入了旧用户名或密码以后，再输入新用户名，或新密码...
