鬼冢虎鞋子:设计一程序,要求输入一字符串,能够计算其中的字母、数字、空格和其他字符的个数。

来源:百度文库 编辑:神马品牌网 时间:2024/05/08 02:12:16
要求必须用Visual FoxPro

*!* 48-57 数字
*!* 65-90 大写字母
*!* 97-122 小写字母
*!* 32 空格
字符串 ="asdfbzxcvasAbcdaw erfweasdf11254 5555#@34543A Sdfasdf 255551&*%^&%$63$#5"

字符数 = len(字符串)
数字个数 = 0
字母个数 =0
空格个数 =0
其它字符 =0
for x=1 to 字符数
ASCII值 = asc(substr(字符串,x,1))
do case
case between(ASCII值 ,48,57)
数字个数 =数字个数 +1
case between(ASCII值 ,65,90)
字母个数 =字母个数 +1
case between(ASCII值 ,97,122)
字母个数 =字母个数 +1
CASE ASCII值 = 32
空格个数 = 空格个数 +1
OTHERWISE
其它字符 = 其它字符+1
endcase
endfor

WAIT WINDOW "数字个数 : " + STR(数字个数)
WAIT WINDOW "字母个数 : " + STR(字母个数)
WAIT window "空格个数 : " + STR(空格个数)
WAIT WINDOW "其它字符 : " + STR(其它字符)

jweijeglkstoieyfASklV OINQv sdgvmpm pa[ ii kawawi'aoiaw-0its[e4ot]
[a-i=ea
e]r i
ea0raert
erte [teor
][odf[
bdsgb o9dru g;psurp9usegsepo0ugw erug0[sdfugaitd;use;gudo9uyesoru9dfiugsdrhtp98ysryusdoryt98nrs yts8yntr9ysery89nydsrtyap9resyter89yhrdieyt98ersy8te9yhdhfdilgydgwshetiusyeaow;puts9iryods8rau
[aiu;09aut09reut9us0r7u'ua'[iua8a8uet3uwpus'z[eua0utw90uty70[9t[aut0e9rty0ep9rauypyfodiytesoiuytdszolhtaeoriuayp ; utqe97u t p 9etu 90u0p39ty 0u-[t38u b7bu0wetueru9tq3-4uq-[8-0u t0r9utu 098ewryt0[qut3q][2q=9i=i8 9awbbjhtuoierutet=-0hiuwtwe0t0p=]