首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
①建立一个如图2.14所示的表单名和文件名均为myform的表单。表单的标题是“教师情况”,表单中有两个命令按钮(Commandl和Command2),两个复选框(Checkl和Check2)和两个单选钮(Optionl和Option2)。(20mmand
①建立一个如图2.14所示的表单名和文件名均为myform的表单。表单的标题是“教师情况”,表单中有两个命令按钮(Commandl和Command2),两个复选框(Checkl和Check2)和两个单选钮(Optionl和Option2)。(20mmand
admin
2013-05-21
19
问题
①建立一个如图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全国计算机二级
相关试题推荐
源程序文件的扩展名为()。
构成循环结构的语句有()个。
以下2题是基于下述描述;设有图书管理数据库:图书(总编号C(6),分类号C(8),书名C(16),作者C(6),出版单位C(20),单价N(6,2))读者(借书证号C(4),单位C(8),姓名C(6),性别C(2),职称C(6),地
在下述关于VisualFoxPro变量的说明中,错误的叙述是______。
在以下关于索引的说明中,错误的是______。
若要限制数据库表中字段的重复值,可以使用______。
设关系R1有r1个元组,关系R2有r2个元组,则关系R1和R2连接后的结果关系中的元组数目是______个。
在命令按钮Command1的Click事件中,改变该表单的标题Caption属性为“学生管理”,下面正确的命令为
下列关于查询和视图的说法中,错误的是
随机试题
下列关于报刊要数基本规定的表述中,正确的有()。
AyounggirlandamanwererecentlyfoundmurderedinaparkedcarinaBostonsuburb.Thepolicefoundnoclue(线索)inthecar
对于精神分裂症偏执型的错误描述是
钱江日报的某记者在该报的副刊上发表了批评某歌星的文章,某歌星认为文章报道失实,侵犯了其名誉权,该歌星应以谁为被告起诉?()
CreditMonitor模型对有风险贷款和债券进行估值的理论基础是()。
甲公司是一个汽车挡风玻璃批发商,为5家汽车制造商提供挡风玻璃。该公司总经理为了降低与存货有关的总成本,请你帮助他确定最佳的采购批量。有关资料如下:(1)挡风玻璃的单位进货成本为1300元。(2)全年需求预计为9900块。(3)每次订货发出与处理订单的
以下选项中,属于教学任务的是()。
王某将自家三层楼房的承建工程承包给没有施工自制的包工头李某。双方合同约定,李某“包工不包料”,在施工过程中产生的一切事故责任由李某承担。李某找来邻居张某帮工,工资100元/天,施工过程中脚手架倒塌,将在地面往上递砖块的张某压成重伤。张某要求包工头李某赔偿医
2013年9月,全国乘用车销售完成()辆。
______near-perfectEnglishlanguageskills,thestudentswerekeentoexploreeveryaspectofAustralianculture,fromAussieea
最新回复
(
0
)