2009年下半年江西省高校计算机等级考试二级VF试(7)

2009年下半年江西省高校计算机等级考试二级VF试卷及答案

CASE G<10

GW=’WY0’+STR(G,1)

CASE G>=10

GW=’WY’+ (68)

ENDCASE

USE (69)

BROW

(70)

USE

ENDDO

TETURN

66．Ａ．<13 Ｂ．<12 Ｃ．>13 Ｄ．>12

67．Ａ．CASE Ｂ．DO CASE Ｃ．DO D．IF CASE

68．Ａ．STR(G,0) Ｂ．STR(G,1) Ｃ．STR(G,2) Ｄ．STR(G,3)

69．Ａ．＄GW Ｂ．*GW Ｃ．GW Ｄ．&GW

70．Ａ．LOOP Ｂ．G=G+1 Ｃ．WAIT Ｄ．GOTO

试题四，综合应用题（共15分）把答案写在答卷纸对应栏内

设计一个表单，计算职工部门表中职工的总人数．其中有2个命令按钮（一个是＂计算各部门总人数＂按钮，另一个是＂退出＂按钮）和一个显示值的文本框，运行结果如下图所示：

假设所有属性都已设置好，单击＂计算各部门总人数＂按钮，在文本框中显示职工总人数的值，现在要求你写出2个命令按钮中的代码．

说明：数据库名：职工

表名：职工部门表

字段名：部门号，职工人数，……

SELECT SUM(职工人数)FROM 职工部门表 GROUP BY 部门号 INTO ARRAY A

THISFORM.TEXT1.VALUE=”职工总人数=”+STR(A)

THISFORM.RELEASE