(1)打开数据库文件“课程管理”,使用SOL语句建立一个视图salary,该视图包括了“系号”和(该系的)“平均工资”两个字段,并且按“平均工资”降序排列。请将该SQL语句存储在four.prg文件中,否则不得分。 (2)打开考生文件夹下的表单si

admin2016-12-05  26

问题 (1)打开数据库文件“课程管理”,使用SOL语句建立一个视图salary,该视图包括了“系号”和(该系的)“平均工资”两个字段,并且按“平均工资”降序排列。请将该SQL语句存储在four.prg文件中,否则不得分。
    (2)打开考生文件夹下的表单six(如图2—33所示),“登录”命令按钮Click事件中的程序功能是:当用户输入用户名和口令以后,单击“登录”按钮时,程序根据自由表“用户表”的内容进行操作,若存“用户表”中找不到相应的用户名,则提示“用户名错误”,若用户名输入正确,而口令输入错误,则提示“口令错误”。修改“登录”命令按钮Click事件中标有错误的语句,使其能够正确运行。注意:不得做其他修改。

选项

答案(1)【操作步骤】 步骤1:在命令窗口执行命令:MODIFY COMMAND four,打开程序文件编辑器编写视图定义代码。 步骤2:在编辑器中输入如下程序代码: 1 OPEN DATABASE 课程管理 2 CREATE VIEW salary AS; 3 SELECT 系号,AVG(工资) AS 平均工资; 4 FROM 教师表; 5 GROUP BY 系号; 6 ORDER BY 平均工资 DESC 步骤3:在命令窗口执行命令:DO four,执行文件。 (2)【操作步骤】 步骤1:在命令窗口执行命令:MODIFY FORM six,打开表单设计器修改表单。 步骤2:双击表单中的“登录”按钮,看到该按钮的Click事件中代码如下: 1 USE 用户表 2 GO TOP 3 flag=0 4 && 下面语句有错误 5 WHILE.NOT.EOF() 6 IF Alltrim(用户名)==Alltrim (This form.Text1.Value) 7 IF Alltrim(口令)==Alltrirm (This form.Text2.Value) 8 WAIT "欢迎使用" WINDOW TIMEOUT 2 9 ELSE 10 WAIT"口令错误"WINDOW TIMEOUT 2 11 ENDIF 12 flag=1 13 EXIT 14 ENDIF 15 && 下面语句有错误 16 NEXT 17 ENDDO 18 && 下面语句有错误 19 CASE FLAG=0 20 WAIT "用户名错误" WINDOW TIMEOUT 2 21 ENDIF 修改后的代码如下: 1 USE 用户表 2 GO TOP 3 flag=0 4 &&下面语句有错误 5 DO WHILE NOT EOF() 6 IF Alltrim(用户名)==Alltrim (Thisform.Text1.Value) 7 IF Alltrim(口令)==Alltrim (Thisform.Text2.Value) 8 WAIT "欢迎使用" WINDOW TIMEOUT 2 9 ELSE 10 WAIT "口令错误" WINDOW TIMEOUT 2 11 ENDIF 12 flag=1 13 EXIT 14 ENDIF 15 && 下面语句有错误 16 SKIp 17 ENDDO 18 && 下面语句有错误 19 IF flag=0 20 WAIT "用户名错误" WINDOW TIMEOUT 2 21 ENDIF 步骤3:单击“常用”工具栏中的“运行”按钮查看结果,将表单文件保存到考生文件夹下。

解析
转载请注明原文地址:https://jikaoti.com/ti/ltk0FFFM
0

最新回复(0)