单选题
[程序说明一]设有自由表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