D回区Fornl:密码Textl:取消确定操作步骤如下：（1）创建一个表单，在其中添加一个标签（label1）、一个文本框（text1）和两个按钮控件（commandl、command2）。（2）各控件属性设置如下表所示。对象属性属性值说明Forml密码验证Caption表单的标题文本密码LabellCaption设置标签的显示文字*设置占位符Text1PasswordCharCommand1确定Caption设置命令按钮的标题文本取消Command2Caption（3）Forml的init事件代码：Publicn&存放输入密码的次数 N=1（4）command1的click事件代码：ifallt(thisform.textl.value)=='123456messagebox"欢迎使用本系统！！"，48，"成功登录！！")elsen=n+1ifn>3messagebox（"你已经输入三次错误用户名，系统拒绝你进入！！"，48，"登录失败！！“）thisform.releaseelsemessagebox（"密码错误！！"，48，"重新输入！！"）thisform.textl.value=""thisform.textl.setfocusendifendif（5）command2的click事件代码：Thisform.release【例5-6】设计如下图所示的表单，要求能根据选项按钮组选定的课程来显示该门课程的平均分
操作步骤如下： （1）创建一个表单，在其中添加一个标签（label1）、一个文本框（text1）和两个按钮 控件（command1、command2）。 （2）各控件属性设置如下表所示。 对象 属性 属性值 说明 Form1 Caption 密码验证 表单的标题文本 Label1 Caption 密码 设置标签的显示文字 Text1 PasswordChar * 设置占位符 Command1 Caption 确定 设置命令按钮的标题文本 Command2 Caption 取消 （3）Form1 的 init 事件代码： Public n &&存放输入密码的次数 N=1 （4）command1 的 click 事件代码： if allt(thisform.text1.value)=='123456' messagebox("欢迎使用本系统！！",48,"成功登录！！") else n=n+1 if n>3 messagebox("你已经输入三次错误用户名，系统拒绝你进入！！",48,"登录 失败！！") thisform.release else messagebox("密码错误！！",48,"重新输入！！") thisform.text1.value="" thisform.text1.setfocus endif endif （5）command2 的 click 事件代码： Thisform.release 【例 5-6】设计如下图所示的表单，要求能根据选项按钮组选定的课程来显示该门课程 的平均分
口回区MForl高等数学统计英语计算机基础C马哲计算机基础76.00操作步骤如下：（1）创建一个表单，在其中添加一个选项按钮组（optiongroupl）、一个命令按钮（command1）和一个标签（label1）控件，将xscj表加到表单的数据环境中。（2）控件属性设置如下表所示。对象属性说明属性值3ButtonCount设置选项按钮组按钮数目optiongroupl高等数学OptionlCaption第一个按钮的标题文本英语Option2CaptionCaptionOption3计算机基础马哲Option4Caption统计Command1CaptionLabellAutosize t.设置自动调整标签大小（3）command1的click事件代码：n=thisform.optiongroupl.valuedo casecase n=laverage高等数学toxm="高等数学“case n=2average英语tox="英语”case n=3average计算机基础toxm="计算机基础”otherwiseaverage马哲toxm-"马哲”endcthisform.labell.caption=m+str(x,6,2)5、复选框（check）复选框控件用来表示一个选项的选中和没选中两种状态。复选框也常与逻辑型字段绑定。主要属性value表示复选框状态，有三种值：为0或.F.表示未选定：为1或.T.表示选定：为2或.null.表示不可用。【例5-7】设计如下图所示的表单，复选框被选中，文本框可见，否则文本框不可见
操作步骤如下： （1）创建一个表单，在其中添加一个选项按钮组（optiongroup1）、一个命令按钮 （command1）和一个标签（label1）控件，将 xscj 表加到表单的数据环境中。 （2）控件属性设置如下表所示。 对象 属性 属性值 说明 optiongroup1 ButtonCount 3 设置选项按钮组按钮数目 Option1 Caption 高等数学 第一个按钮的标题文本 Option2 Caption 英语 Option3 Caption 计算机基础 Option4 Caption 马哲 Command1 Caption 统计 Label1 Autosize .t. 设置自动调整标签大小 （3）command1 的 click 事件代码： n=thisform.optiongroup1.value do case case n=1 average 高等数学 to x m="高等数学" case n=2 average 英语 to x m="英语" case n=3 average 计算机基础 to x m="计算机基础" otherwise average 马哲 to x m="马哲" endc thisform.label1.caption=m+str(x,6,2) 5、 复选框（check） 复选框控件用来表示一个选项的选中和没选中两种状态。复选框也常与逻辑型字段绑 定。主要属性 value 表示复选框状态，有三种值：为 0 或.F.表示未选定；为 1 或.T.表示选 定；为 2 或.null.表示不可用。 【例 5-7】设计如下图所示的表单，复选框被选中，文本框可见，否则文本框不可见