句用于修改表的结构,其中ADD短语的功能是添加新的字段或索引,UNIQUE短语的功能是指建立候选索引(注意不是唯一索引),ADD UNIQUE连用表示新增一个候选索引,TAG短语用于指定索引名称。在第4小题中,由题意可知,DO...WHILE循环语句的格式为:
DO WHILE <条件> <命令序列> ENDDO
【操作步骤】
(1)在命令窗口输入: Crea Data 按下回车键执行语句,打开数据库设计器,将表"教师表"、"课程表"和"表"添加到数据库中。
(2)新建一个程序,输入:
ALTER TABLE 课程表 ADD UNIQUE 课程号 TAG temp
保存程序名为one,最后运行程序。
(3)通过表单向导新建一个表单,选定"课程表"的全部字段作为选定字段,选择按"课程号"降序排序,完成向导并输入表单文件名myform。
(4)打开程序test,将第二行语句改为:
DO WHILE i>=1 保存并运行程序,查看运行结果。
②【解题思路】在第1小题中,对于SQL的查询语句,将查询结果保存到数组中应该使用INTO短语,而不是TO;打开表的命令是"USE";SCAN循环语句表示条件的短语应该用FOR,而不是OF;由题意知,变量SUM用于统计满足条件的教师人数,故应使"每找到一条满足条件的记录,SUM值自动加1"。在第2小题中,视图设计器的使用同查询设计器,考生可以参考前面讲到的查询设计器来设计本题的视图。
(1)【操作步骤】
打开考生文件夹下的程序文件temp.prg,并按题目的要求进行改错,修改完成后运行程序文件,如下所示。
***********程序提供的代码***********
&;&;下句只有一处有错误
SELECT 课程号 FROM 课程表 WHERE 课程名="数据结构" TO ARRAY a
&;&;下句有错误 OPEN 教师表 STORE 0 TO sum &;&;下句两处有错误 SCAN OF 课程号=a OR 工资>=4000
&;&;下句有错误 sum+1 ENDSCAN ?sum
********************************
错误1:将 TO 改为 INTO。
错误2:将 OPEN 改为 USE。
错误3:将 SCAN OF 改为 SCAN FOR。
错误4:将 OR 改为 AND。
错误5:将 sum+1 改为 sum=sum+1。
(2)【操作步骤】
步骤1:单击系统菜单中的"新建"命令,新建一个视图,将表"教师表"和"表"添加到新建的视图中。
步骤2:将"教师表."、"教师表.工资"和"表.系名"添加到选定字段中。
步骤3:在筛选选项卡中选择字段"教师表.工资",条件为">=",实例为"4000"。
步骤4:在排序选项卡中,设置按"工资"降序排序,再按"系名"升序排序。
步骤5:保存视图名为"teacher_v"。
③【解题思路】建立表单并添加控件,然后按要求修改各控件的属性;在表单的load事件中定义组合框的数据源,完成命令按钮的代码;当列表框要求为数组时,可以在表单的load事件中进行定义;为选项按钮组设置标题,需要右键单击选项按钮组控件,选择"编辑"命令。
【操作步骤】
步骤1:在命令窗口输入:\
Create Form oneform
并按回车键,新建一个名为oneform表单。
步骤2:在表单控件中以拖拽的方式向表单中添加两个标签、一个选项组、一个组合框和两个命令按钮,并修改各控件的属性。
步骤3:双击表单空白处,编写表单的load事件代码:
********表单的load事件代码*********
public a(3) a(1)="3000" a(2)="4000" a(3)="5000"
*************************
步骤4:双击命令按钮,分别编写"生成"和"退出"按钮的Click事件代码。
******"生成"按钮的Click事件代码*******
x=val(thisformbo1.value)
if
thisform.optiongroup1.value = 1
sele * from 教师表 where 工资 >= x order by 工资 desc, into table salary
else
sele * from 教师表 where 工资 < x order by 工资 desc, into table salary
endif
*************************************
******"退出"按钮的Click事件代码*******
ThisForm.Release *******
上一篇:
2012年计算机二级VFP表单设计学习教程设计自定义表单_vfp代码
下一篇:
房地产企业财务管理实务操作