2011春VFP上机试卷含答案(3)

2019-04-09 23:23

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


2011春VFP上机试卷含答案(3).doc 将本文的Word文档下载到电脑 下载失败或者文档不完整,请联系客服人员解决!

下一篇:电气运行计算题

相关阅读
本类排行
× 注册会员免费下载(下载后可以自由复制和排版)

马上注册会员

注:下载文档有可能“只有目录或者内容不全”等情况,请下载之前注意辨别,如果您已付费且无法下载或内容有问题,请联系我们协助你处理。
微信: QQ: