单选题 [程序说明一]设有自由表XSB,表的各个字段名均以英文字母开头。要求将XSB表的各个字段名的开头字母转换成A。
[程序一]
CLOSE TABLE ALL
USE XSB
N= ______
FOR T=1 TO N
C=FIELD(T)
CC="A"+SUBSTR(C,2)
______ TABLE XSB RENAME COLUMN &C TO &CC
ENDFOR
CLOSE TABLE ALL
[程序说明二]设有自由表XSB,要求将XSB表中的各个字符型字段的字段名显示出来,统计并显示共有多少个字符型的字段。
[程序二]
CLOSE ALL
USE XSB
SUM=0
FOR I=1 TO FCOUNT()
IF TYPE(FIELD(I))="C"
? ______
______
ENDIF
ENDFOR
? SUM
【正确答案】 A
【答案解析】
【正确答案】 D
【答案解析】[解析] 要修改表中每个字段的名,首先要知道字段数目,可通过FCOUNT()函数返回字段数目,故第1空应填“FCOUNT()”。本题FOR循环的作用是依次取出表中的每一个字段,然后通过修改表结构命令给原来的每个字段名前加上一个“A”,修改表结构的命令是AITER TABLE,所以第2空应填“ALTER”。
【正确答案】 B
【答案解析】[解析] 字段名函数的格式:FIELDS(<数值表达式>[,<工作区号>|<别名>])。功能:返回指定工作区中第<数值表达式>个字段名称。输出为字符型。题中要求显示字段的名称。所以此空填FIELD(I)。
【正确答案】 D
【答案解析】[解析] 本题要求统计并显示共有多少个字符型的字段,而在程序的最后一行是“? SUM”,由此可见,SUM中存放的是字符型字段的个数。本程序的功能是扫描所有的字段,如果字段的类型为字符型(TYPE(FIELD(i)))="C"),则SUM中的值加1。最后显示SUM中的值。