Count(*) as 选课人数
Sum(iif(cj.cj>=60,1,0)) as 选课人数 分组:lx
排序:lx降序、选课人数 升序 去向:Temp 三、设计菜单
JXGL项目中已存在菜单MENU,其中已定义了“文件”菜单栏及其中的“退出菜单”项。按如下要求设计菜单,菜单运行后如图1所示。
1、在“文件”菜单栏下添加“画图”菜单项,为“画图”菜单项编写命令代码:RUN/N mspaint。
2、在“文件”菜单栏右侧创建“成绩管理”菜单栏。
3、为“成绩管理”菜单栏设置访问键“C”。 4、为“成绩管理”菜单栏创建子菜单“查询”和“计算学分”。
5、在“查询”和“计算学分”菜单项之间插入分组线。 四、设计表单
表单F102G用来按小组查看世界杯球队信息。按下列要求修改表单,修改后表单运行时如图2所示。
1、列表框List1用来显示选定组别的球队列表,设置其列数为3,数据源类型为“6-字段”,数据源设置为“组别,编号,国家”三个字段。
ColumnCount 3 RowSourceType RowSource: fifa.组别,编号,国家
2、在“队名”标签右侧添加一个OLE绑定型控件,用来显示国旗。设置其绑定到“国旗”字段,并将图像显示方式设置为“变比填充”方式。
注意:表单控件中有两个OLE控件,应该添加的是蓝色的那个 绑定:设置OLE的ControlSource属性:fifa.国旗 Stretch 变比填充
3、完善“组别”下拉列表看Combo1的InterActiveChange事件代码,在原有代码的IF?ENDIF语句汇总的空白行处加入一条语句实现:如果下拉列表框Combo1当前选择是“全部”,则取消对fifa表的筛选。此外,在原有代码的最后增加一条语句,使List1的第一项被选中。
中间增加一行:Set Filter to
最后增加一行:Thisform.List1.ListIndex=1
4、编写列表框List1的InterActiveChange事件代码,实现:将标签Label3的标题设置为当前选定的fifa表中国家字段的值并刷新表单。
Thisform.Label3.Caption=fifa.国家 Thisform.Refresh 五、程序改错
下列程序的功能是:在屏幕上显示如图3所示的菱形。要求:
① 将下列程序输入到项目中的程序文件PCODE中,并对其中的2条错误语句进行修改; ② 在修改程序时,不允许修改程序的总体框架和算法,不允许增加减少语句数目。 CLEAR
=ff(10,?A?,?B?) PROCEDURE ff()
PARA 10,S1,S2 && PARA m,S1,S2 FOR i=1 TO m ??SPACE(m-i)
FOR j=1 TO 2*m-1 FOR j=1 TO 2*i-1
??IIF(INT(i/2)=i/2,s1,s2)
ENDFOR ?
ENDFOR
FOR i=m-1 TO 1 STEP –1
??SPACE(m-i)
FOR j=2*i-1 TO 1 STEP –1 ??IIF(INT(i/2)=i/2,s1,s2) ENDFOR ? ENDFOR