clear
accept "请输入一个字符串(字符串只包含字母和号):" to zf
input "请输入字符串尾部号个数:" to n
l=len(zf)
s=0
for i=l to 1 step -1
k=substr(zf,i,1)
if k=""
s=s+1
else
exit
endif
endfor
if s>n
zf1=left(zf,l-(s-n))
else
zf1=zf
endif
"字符串应为:",zf1
以上就是关于vfp程序设计 急!!!全部的内容,包括:vfp程序设计 急!!!、、等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)