先开始发在www.lxsea.com没人看 现在拿过来让大家看看 提提意见~~- @rem code by 基拉freedom 2008.08.19. lxsea
- @echo off
- setlocal EnableDelayedExpansion
- color FD
- :j
- echo. ▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓
- echo. ▓ 计算您输入的单词个数 ▓
- echo. ▓ 你可以输入中文 English或数字 ▓
- echo. ▓ 支持输入空格(可多空格) ▓
- echo. ▓ made by 基拉freedom ▓
- echo. ▓ 不支持非法字符的输入 特别是+号 ▓
- echo. ▓ 请勿在结尾故意多加空格 否则会不准 ▓
- echo. ▓ 联系我?? qq:276790434 ▓
- echo. ▓例子:输入I love you. 显示有3个单词 ▓
- echo. ▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓
- set /p var=请输入句子:
- set var1="%var%+"
- set a=0
- set b=1
- set c=1
- :begin
- set var2=!var1:~%a%,1!
- if "!var2!" neq " " (set b=1&goto c) else (goto a)
- :a
- if "!b!" neq "1" goto c
- set /a c=!c!+1
- set b=0
- :c
- set /a a=!a!+1
- if /i "!var2!" neq "+" goto begin
- color FC
- echo 您输入的单词个数为:!c!
- echo 谢谢您的使用
- echo 按N退出 回车键继续
- set /p g=(N键??回车键??)
- if /i "%g%"=="n" goto bye
- cls
- goto j
- :bye
- exit
复制代码 不支持非法字符
先开始想的时候很简单 只要计算空格数+1 后来想起来了 如果单词和单词之间有很多空格该怎么办呢 于是用笨脑子想了一段时间 终于想出来了(详细看代码咯)
但始终无法克服如果末尾有空格该怎么办 高手来帮我想想 谢谢了~~~~~
好了~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
代码运行不正常 请查看附件
本文来自:『理想技术论坛』请记住我们的网址: http://bbs.lxsea.com ! 本文详细地址:http://bbs.lxsea.com/read.php?tid=62141 |