填空题

完善下列程序，其功能是统计一个文本文件(内容为英文文章)中大小写英文字母的个数。
CLEAR
cFile=GETFILE("TXT", "文件名")
cc=fileToMem(cFile)
STORE 0 TO i, j
DO WHILE LEN(cc)＞0
c=LEFT(cc, 1)

CASE ASC(c)＞96 AND ASC(c)＜123
j=j+1
CASE ASC(c)＞64 AND ASC(c)＜91
i=i+1
ENDCASE
cc=SUBSTR()
ENDDO
"大写、小写英文字母个数分别为"，__
FUNCTION fileToMem &&该函数的功能是将文件内容读到内存变量中
PARAMETER cFileName
fhandle=FOPEN(cFileName)
cText=SPACE(0)
IF fhandle＞0
nSize=FSEEK(fhandle, 0, 2)
=FSEEK(fhandle, 0)
cText=FREAD(fhandle, nSize)
=FCLOSE(fhandle)
ENDIF
RETURN eText

答案： DO CASE；cc，2；i，j或STR(i)+STR(j)

你可能感兴趣的试题

在信息系统的开发过程中，数据库设计一般分为三个阶段，即概念结构设计、逻辑结构设计和物理结构设计。其中，概念结构设计阶段常使用的设计工具是______图。

答案： E-R

VFP支持多种数据类型，如字符型、货币型、数值型等。每种数据类型可以用一个字母表示，如字符型可用C表示、数值型可用N表示、备注型可用______表示。

答案： M

用户可以在表设计器中修改表结构，也可以用命令直接修改表结构。例如，删除xs表的更新触发器可以使用命令DELETE ______ ON xs FOR UPDATE。

答案： TRIGGER

一个工作区中仅能打开一个表，但同一个表可以在多个工作区中同时打开。例如，xs表已在1号工作区打开，则在5号工作区再次打开该表，可以使用命令USE xs IN 5______。

答案： ACAIN

在使用SELECT-SQL命令进行查询时，可以在查询命令中使用______子句指定查询结果必须满足的筛选条件。

答案： HAVING

某高速公路上有一个测速点(该路段限速60～120km/h)，它对所有来往的车辆进行测速，并将测速数据登记在表clcs中。该表含有El期时间(sj)字段、汽车牌号(ph)字段和数值型的车速(cs)字段。下列SELECT-SQL命令可以查询出所有的违章车辆(低于最低速度或超过最高速度限制)：
SELECT sj, ph, cs FROM clcs______

答案： WHERE cs＜60 OR cs＞120

运行下列程序后，显示的运行结果为______。
CLEAR
FOR i=1 TO 3
j=1
DO WHILE J＜4
m=i*j
IF MOD(m, 2)=0
m
ENDIF
J=j+1
ENDDO
i=i+1
ENDFOR

答案： 2；6

完善下列程序，其功能是统计一个文本文件(内容为英文文章)中大小写英文字母的个数。
CLEAR
cFile=GETFILE("TXT", "文件名")
cc=fileToMem(cFile)
STORE 0 TO i, j
DO WHILE LEN(cc)＞0
c=LEFT(cc, 1)

CASE ASC(c)＞96 AND ASC(c)＜123
j=j+1
CASE ASC(c)＞64 AND ASC(c)＜91
i=i+1
ENDCASE
cc=SUBSTR()
ENDDO
"大写、小写英文字母个数分别为"，__
FUNCTION fileToMem &&该函数的功能是将文件内容读到内存变量中
PARAMETER cFileName
fhandle=FOPEN(cFileName)
cText=SPACE(0)
IF fhandle＞0
nSize=FSEEK(fhandle, 0, 2)
=FSEEK(fhandle, 0)
cText=FREAD(fhandle, nSize)
=FCLOSE(fhandle)
ENDIF
RETURN eText

答案： DO CASE；cc，2；i，j或STR(i)+STR(j)