VFP怎么写统计字数的命令,还有要消除空格

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/10 20:05:01
VFP怎么写统计字数的命令,还有要消除空格

VFP怎么写统计字数的命令,还有要消除空格
VFP怎么写统计字数的命令,还有要消除空格

VFP怎么写统计字数的命令,还有要消除空格
以下代码用来统计EDIT1中中文状态下输入的中文字和标点符号的总个数,不包括空格和回车所占的字符:
在BUTTON中写下如下代码:
nLine=MEMLINES(thisform.edit1.Value)
cL=ALLTRIM(STR((LEN(STRTRAN(THISFORM.EDIT1.Value," "))-(nLine-1)*2)/2))
MESSAGEBOX("字数:" +cL, 0+64+0, "结果")