完善下列程序,其功能是统计一个文本文件(内容为英文文章)中各个英文字母(不区分大小写)出现的次数。
CLEAR
cFile=GETFILE(’TXT’,’文件名’)
cc=（）(fileToMem(cFile))
DIMENSION abe(26)
abc=0
DO WHILE LEN(cc)>0
c=LEFT(cc,1)
cc=SUBSTR(cc,2)
IF !(c>=’A’ AND c<=’Z’)
（）
ENDIF
i=ASC(c)-ASC(’A’)+1
abc(i)=（）
ENDDO
FOR i=1 To 26
CHR(ASC(’A’)-1+i)+’的个数为’,abc(i)
ENDFOR
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 cText