|
4.3、表单与代码设计 （一）登录界面的设置 paper51.com 本功能是为了更好的维护系统和管理系统而设置的。 paper51.com 操作步骤如下： 内容来自论文无忧网 www.paper51.com (1)在项目管理器中选中“表单”，再单击项目管理器右边的“新建”按钮，将会弹出“新建表单”对话框，单击“新建表单”按钮，将会进入表单设计器窗口。 内容来自论文无忧网 www.paper51.com
(2)对表单进行属性设置 内容来自www.paper51.com Form1的coption属性设置为“登录界面”， paper51.com Label的名字也是用coption属性设置的。 内容来自论文无忧网 www.paper51.com
具体表单如下图所示 内容来自论文无忧网 www.paper51.com (3)在表单上添加控件，设计出如上图所示的用户界面，其操作步骤在此不详述。 paper51.com （4）对表单控件进行特殊设置。这此控件的基本属性设置在此不详述，在此只对表单控件进行特殊设置。 内容来自论文无忧网 www.paper51.com l combol控件(用户名称)。由于用户名称用两个的情况，需要设置该组合框的值，其操作方法是：在combol控件中单击鼠标右键，将弹出一个快捷菜单下图1，选择“生成器”命令，将会弹出下图2 所示的组合框生成器对话框，在“列表项”选项卡中选择“值”在路径选项中选择“mm.dbf”中的“用户名称”。属性”name”改为combol. http://www.paper51.com l txtpassword的属性”name”改为”txtpassword”，也是由生成器来获得它的值，由combol的方法一样。具体如下图所示。 copyright paper51.com http://www.paper51.com 图1 内容来自www.paper51.com 图2 copyright paper51.com l 下面是对代码的介绍。 copyright paper51.com
确定按钮的代码如下： 内容来自www.paper51.com sele mm \\打开mm表 http://www.paper51.com
loca for allt(mm.管理员名称)==allt(thisform.combo1.value) and allt(mm.密码)==allt(thisform.txtpassword.value) \\寻找管理员和密码 内容来自www.paper51.com
if foun() \\如果找到 paper51.com
do wjcd.mpr \\就运行wjcd.mpr http://www.paper51.com
read event paper51.com thisform.visible=.t. 内容来自www.paper51.com
this.parent.txtpassword.value=" " copyright paper51.com http://www.paper51.com else http://www.paper51.com #define mismatch_loc"用户号或口令不正确！请重新输入。" paper51.com wait windowmismatch_loc timeout 1 copyright paper51.com thisform.txtpassword.value="" paper51.com
thisform.txtpassword.setfocus paper51.com endi 内容来自论文无忧网 www.paper51.com thisform.release 内容来自www.paper51.com 退出按钮的代码： 内容来自论文无忧网 www.paper51.com thisform.release *释入表单 内容来自www.paper51.com clear events *退出整个运行系统 copyright paper51.com
(二)、简单介绍欢迎界面的设置和代码 内容来自www.paper51.com l 设置男生人数查询按钮 paper51.com coption:男生人数查询 paper51.com
代码: do form form\nsrs 内容来自www.paper51.com l 男生寝室查询按钮及以下按钮就不逐步介绍 内容来自论文无忧网 www.paper51.com
l 代码分别是：男生寝室查询: do form form\nscx 内容来自www.paper51.com 女生为数查询: do formform\cxrs 内容来自论文无忧网 www.paper51.com 女生寝室查询: do formform\lsqs http://www.paper51.com 退出:quit 内容来自论文无忧网 www.paper51.com 单击进入：do wjcd.mpr copyright paper51.com thisform.release paper51.com
http://www.paper51.com 自动添加的代码有： 内容来自www.paper51.com
appe blank paper51.com go bott 内容来自论文无忧网 www.paper51.com
thisform.refresh paper51.com
wait wind '记录已经增加了！' 内容来自论文无忧网 www.paper51.com *go bott copyright paper51.com 删除的代码有： 内容来自论文无忧网 www.paper51.com dele paper51.com skip paper51.com
thisform.refresh paper51.com 退出的代码是： 内容来自论文无忧网 www.paper51.com thisform.release copyright paper51.com
内容来自论文无忧网 www.paper51.com
自动添加的代码有： 内容来自论文无忧网 www.paper51.com appe blank 内容来自论文无忧网 www.paper51.com go bott 内容来自www.paper51.com
thisform.refresh paper51.com wait wind '记录已经增加了！' http://www.paper51.com
*go bott 内容来自www.paper51.com
退出的代码： http://www.paper51.com thisform.release 内容来自论文无忧网 www.paper51.com 删除的代码： 内容来自www.paper51.com dele copyright paper51.com
skip copyright paper51.com thisform.refresh http://www.paper51.com 自动添加的代码有： 内容来自论文无忧网 www.paper51.com appe blank copyright paper51.com go bott paper51.com thisform.refresh paper51.com wait wind '记录已经增加了！' 内容来自www.paper51.com *go bott 内容来自论文无忧网 www.paper51.com 退出的代码： copyright paper51.com thisform.release 内容来自论文无忧网 www.paper51.com 删除的代码： 内容来自www.paper51.com dele http://www.paper51.com skip 内容来自www.paper51.com thisform.refresh 内容来自www.paper51.com
copyright paper51.com |