表单设计范例(一)解析.docVIP

表单设计范例（一） 一、简单的信息显示界面的设计 例6.1 设计一个信息行（显示的是当前的系统时间）可以在表单的高度范围（顶部与底部）之间动态上下平等移动的界面。P285 特点： 1表单上任何的控件对象只用于显示某种信息，无需用户做任何操作 2显示的信息可以是静态的，也可以是动态的 主要涉及到的例题有：时钟，文字形状的缩放移动 二、交互对话界面的设计 特点： 1一般都会有文本框和按钮这两类控件，如果问题复杂点还有可能包含复选框，选项组，按钮组，微调控件等一切需要鼠标单击或键盘输入的控件 2强调“交互”，即交流对话，也就是用户作一个输入或单击，系统则给出相应的反应 主要涉及到的命题：口令登录问题，计算类问题（求圆面积，求三角形面积，求正方体面积，输出20个能被3整除且个位是3的数字等），列表框中数据移动 以下是部分例题总结： 1、口令登录问题（四种不同形式的例子） 形式一： 题目描述：在文本框输入口令，如果输入的是“SUPER“，则在下面的标签里面显示“正确”，否则显示“错误”。 控件名称 涉及属性 涉及事件 涉及方法 FORM CAPTION INIT LABEL FONTSIZE，CAPTION TEXTBOX FONTSIZE VALID FORM1.INIT THIS.LABEL2.VISIBLE=.F. THIS.TEXT1.PASSWORDCHAR=“*” TEXT1.VALID THISFORM.LABEL2.VISIBLE=.T. IF ALLT(THIS.VALUE)==SUPER THISFORM.LABEL2.CAPTION=正确！ ELSE THISFORM.LABEL2.CAPTION=错误! ENDIF 形式二： 题目描述：在文本框中输入口令，如果输入的是“SUPER”，则在弹出的消息框中提示“正确”，否则提示“错误”。要求当输入完毕按下回车即能触发“确定”按钮，单击“退出”按钮则能释放表单，结束程序。 控件名称 涉及属性 涉及事件 涉及方法 FORM CAPTION INIT RELEASE LABEL FONTSIZE，CAPTION TEXTBOX FONTSIZE COMMAND BUTTON FONTSIZE，CAPTION CLICK FORM1.INIT THIS.TEXT1.PASSWORDCHAR=* THIS.COMMAND1.DEFAULT=.T. COMMAND1.CLICK IF ALLT(THISFORM.TEXT1.VALUE)==SUPER MESSAGEBOX(正确！) ELSE MESSAGEBOX(错误！) ENDIF COMMAND2.CLICK THISFORM.RELEASE 形式三： 题目描述：在页框第一页的登录界面的文本框中输入口令，当输入为“SUPER”时则激活第二页，显示“欢迎使用本系统！”，否则则激活第三页，显示“你无权使用本系统！”。要求输入完毕按回车即能触发“确定”按钮。单击“退出”按钮则能释放表单，结束程序。 控件名称 涉及属性 涉及事件 涉及方法 FORM CAPTION INIT RELEASE LABEL FONTSIZE，CAPTION TEXTBOX FONTSIZE COMMAND BUTTON FONTSIZE，CAPTION CLICK PAGEFRAME CAPTION PAGECOUNT ACTIVEPAGE FORM1.INIT THIS.PAGEFRAME1.PAGE1.TEXT1.PASSWORDCHAR=* THIS.PAGEFRAME1.PAGE1.ENABLED=.T. THIS.PAGEFRAME1.PAGE2.ENABLED=.F. THIS.PAGEFRAME1.PAGE3.ENABLED=.F. THIS.PAGEFRAME1.ACTIVEPAGE=1 THIS.PAGEFRAME1.PAGE1.TEXT1.SETFOCUS THIS.PAGEFRAME1.PAGE1.COMMAND1.DEFAULT=.T. COMMAND1.CLICK IF ALLT(THIS.PARENT.TEXT1.VALUE)=SUPER THISFORM.PAGEFRAME1.PAGE1.ENABLED=.F. THISFORM.PAGEFRAME1.PAGE2.ENABLED=.T. THISFORM.PAGEFRAME1.PAGE3.ENABLED=.F. THISFORM.PAGEFRAME1.ACTIVEPAGE=2 ELSE THISFORM.PAGEFRAME1.PAGE1.ENABLED=.F. THISFORM.PA