设计名为my的表单。表单标题为“学习情况浏览”。表单中有1个选项组控件(名为myop)、2个命令按钮“成绩查询”和“关闭”。其中,选项组控件有两个按钮“升序”和“降序”。根据选择的选项组控件,将选修了“数据结构”的学生的“学号”和“成绩”分别存入new1.

admin2009-02-15  41

问题 设计名为my的表单。表单标题为“学习情况浏览”。表单中有1个选项组控件(名为myop)、2个命令按钮“成绩查询”和“关闭”。其中,选项组控件有两个按钮“升序”和“降序”。根据选择的选项组控件,将选修了“数据结构”的学生的“学号”和“成绩”分别存入new1. dbf和new2.dhf文件中。

选项

答案在命令窗口中输入命令:CREATE FORMmy,打开表单设计器,新建表单。 从表单控件工具栏中,向表单添加2个命令按钮(Command1和Command2)和1个选项按钮组 (Optiongroup1)。根据题意,在属性面板中,修改表单的Caption属性值为“学习情况浏览”,修改命令按钮Command1的Caption属性值为“成绩查询”,修改命令按钮Command2的Caption属性值为“关闭”,修改选项按钮组(Optiongroup1)的Name属性值为“myop”,然后右击选项按钮组,选择“编辑”快捷菜单命令,在此状态下(编辑状态下,控件四周出现蓝色框线),分别修改两个单选项的Caption属性值为“升序”和“降序”。 双击“成绩查询”命令按钮,编写Click事件代码,内容如下: ******命令按钮Command1(成绩查询)的Click事件代码***** DO CASE CASE Thisform.myop.Value=1 SELECT 学号,成绩; FROM 课程,选课; WHERE 课程.课程号=选课.课程号AND课程名称="数据结构"; ORDER BY 成绩; INTO TABLE new1 CASE Thisform.myop.Value=2 SELECT 学号,成绩; FROM 课程,选课; WHERE 课程.课程号=选课.课程号AND课程名称="数据结构"; ORDER BY成绩DESC; INTO TABLE new2 ENDCASE ********************************************************* 同样在“关闭”命令按钮的Click事件中输入:Thisform.Release。 运行表单,结果如图3-139所示,保存表单设计到考生文件夹下。 [*]

解析 本大题考查宁表单设计,在设计控件属性时,不要将控件的标题和名称属性弄混淆了;程序部分可利用DO CASE的分支语句,每个分支语句包含一个相应的SQL查询语句,根据选项组中单选项的内容,查找相应的数据记录存入新表中。
转载请注明原文地址:https://kaotiyun.com/show/xSKZ777K
0

随机试题
最新回复(0)