2. 计算机
  3. ①建立一个如图2．14所示的表单名和文件名均为myform的表单。表单的标题是“教师情况”，表单中有两个命令按钮(Commandl和Command2)，两个复选框(Checkl和Check2)和两个单选钮(Optionl和Option2)。(20mmand

①建立一个如图2．14所示的表单名和文件名均为myform的表单。表单的标题是“教师情况”，表单中有两个命令按钮(Commandl和Command2)，两个复选框(Checkl和Check2)和两个单选钮(Optionl和Option2)。(20mmand

admin2013-05-21  11
问题 ①建立一个如图2．14所示的表单名和文件名均为myform的表单。表单的标题是“教师情况”，表单中有两个命令按钮(Commandl和Command2)，两个复选框(Checkl和Check2)和两个单选钮(Optionl和Option2)。(20mmandl和Command2的标题分别是“生成表”和“退出”，Checkl和Check2的标题分别是“系名”和“工资”，Optionl和Option2的标题分别是“按职工号升序”和“按职_T号降序”。

②为“生成表”命令按钮编写程序。程序的功能是根据表单运行时复选框指定的字段和单选钮指定的排序方式生成新的自由表。如果两个复选框都被选中，生成的自由表命名为two．dbf，two．dbf的字段包括“职工号”、“姓名”、“系名”、“工资”和“课程号”；如果只有“系名”复选框被选中，生成的自由表命名为one x．dbf,．one x．dbf的字段包括职工号、姓名、系名和课程号；如果只有“工资”复选框被选中，生成的自由表命名为one xx．dbf,．one xx．dbf的字段包括职工号、姓名、工资和课程号。
③运行表单，并分别执行如下操作：
选中两个复选框和“按职工号升序”单选钮，单击“生成表”命令按钮。
只选中“系名”复选框和“按职工号降序”单选钮，单击“生成表”命令按钮。
只选中“工资”复选框和“按职工号降序”单选钮，单击“生成表”命令按钮。
选项
答案本题主要考查的是DO WH工LE循环语句和IF条件语句的使用。本题程序的功能大致如下： 首先打开“用户表”，同时定义一个变量并赋值O。 然后通过DO WH工LE语句开始判断记录指针是否到达文件末尾，如果没有，则开始执行后面的条件语句，第一次判断表中当前记录的“用户名”是否等于表单中第一个文本框中的值；如果等于，则再继续判断该记录的石令值是否等于表单中第二个文本框的值；如果不等于，则退出条件语句结构，执行SKIP命令，将指针指向“用户表”的下一条记录，当指针记录指向表末尾后还没找到相等的内容，则退出循环体，执行ENDDO后面的IF语句，提示“用户名错误”的信息，执行此条件语句的要求为flaq=O。 当判断表中当前记录的“用户名”等于表单中第一个文本框中的值后，再判断用户名的密码值也等于表单中第二个文本框的值时，则显示欢迎框，退出条件语句结构，将变量flaq的值赋为1，退出循环体，当退出循环体后，由于flaq的值已设置为1，则不再执行ENDDO后面的IF语句，程序结束；如果密码不相等时，则提示“口令错误”的信息。 【操作步骤】 步骤1：在命令窗口执行命令：MODIFY FORM six，打开表单设计器修改表单。 步骤2：双击表单中的“登录”按钮，看到该按钮的 Click事件中代码如下： USE GO TOP flag=O ＆＆下面语句有错误 WHILE．NOT．EOF() IF A1ltrim(用户名) =Alltrim(Thisform． Textl．Value) IF Alltrim()=Alltrim(This fOrm．Text2．Value) WAIT”欢迎使用”NDOW TIMEOUT 2 ELSE wAIT”口令错误”INDOW TIMEOUT 2 ENDIF flag=1 EXIT ENDIF ＆＆下面语句有错误 NEXT ENDDO ＆＆下面语句有错误 CASE FLAG=0 WAIT”用户名错误”WINDOW TIMEOUT 2 ENDIF 修改后的代码如下： USE GO TOP flag=0 ＆＆下面语句有错误 DO WH工LE NOT EOF() IF Alltrim(用户名)--Alltrim(Thisform． Textl．Value) IF Alltrim(口令)==Alltrim(Thisform． Text2．Valme) WAIT”欢迎使用”WINDOW TIMEOUT 2 ELSE WAIT 口令错误 WINDOW TIMEOUT 2 ENDIF flag=l EXIT ENDIF ＆＆下面语句有错误 SKIP ENDDO &&下面语句有错误 IF flag=0 WAIT”用户名错误”WINDOW TIMEOUT 2 ENnTF 步骤3：单击“常用”工具栏中的“运行”按钮查看结果，将表单文件保存到考生文件夹下。
解析
转载请注明原文地址:https://kaotiyun.com/show/bTop777K
本试题收录于： 二级VF题库NCRE全国计算机二级分类
0

二级VF

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)