Board logo

标题: [求助]如何获得字符的字数和截取字符 [打印本页]

作者: yangzhiyi     时间: 2007-3-17 09:39    标题: [求助]如何获得字符的字数和截取字符

截取偶字数且最大为八个字数应该怎么做? 例如输入:一二三四五六七八九十 截取为:一二三四五六七八 例如输入:一二三四五六七八 截取为:一二三四五六七八 例如输入:一二三四五六七 截取为:一二三四五六 例如输入:一二三四五六 截取为:一二三四五六 例如输入:一二三四五 截取为:一二三四 例如输入:一二三四 截取为:一二三四 例如输入:一二三 截取为:一二 例如输入:一二 截取为:一二 例如输入:一 提示为:必须输入两个字以上 例如输入: 提示为:必须输入且两个字以上 截取和提示我都会做,只是不会得到字符个数

作者: qjbm     时间: 2007-3-17 11:40
对于在批处理中计算变量中字符个数需要编写一整套的"函数"来实现 特殊字符是批处理永远说不出的痛...... 下面是一个拙例:
@ECHO %DBG% OFF
SETLOCAL ENABLEDELAYEDEXPANSION

SET STR=一二三四五六七八九十1234,.FJSFJSFGDFG
CALL :JIS 0 1
GOTO :EOF

:JIS
FOR /L %%i IN (%1,1,%2) DO (
                            IF "TMP!STR:~%%i!"=="TMP" ECHO %%i 
                            IF "TMP!STR:~%%i!" NEQ "TMP" (
                                                          SET /A g=%%i+1,h=%%i+2
                                                          CALL :JIS !g! !h!
                                                          )
                            GOTO :EOF
                            )
-------------------------------------------- 呵呵:)~~ 看样子果然是我把问题复杂化了, 还是做看客悄悄学习的比较少受批评:) 当时见此贴浏览次数超过70+无人回复, 且有讨论价值,沉了比较可惜才顶了一下,真是不好意思了... ------------------------------------------- 天天来,天天哭........... 歇段时间再说吧........ [ Last edited by qjbm on 2007-3-18 at 03:07 PM ]

作者: yangzhiyi     时间: 2007-3-18 03:50
能解释一下吗,看不明白 我运行后得到的是 27 啊,不对啊 我想做的只有中文,没特殊字符 再问下两个字符串连接起来如: 字符:一三 和字符:12 得到 一三12 ?

作者: bjsh     时间: 2007-3-18 04:38
二楼的数字符的也太复杂了吧;
@echo off set /p var=请输入: set count=0 :loop if "%var%"=="" goto jump set var=%var:~0,-1% set /a count=%count%+1 goto loop :jump echo %count% pause

作者: bjsh     时间: 2007-3-18 04:54
回答lz的问题 对于任意长度的字符的代码
@echo off set /p var=请输入: set var_bak=%var% set count=0 :loop if "%var%"=="" goto jump set var=%var:~0,-1% set /a count=%count%+1 goto loop :jump set /a x=%count%/2*2 if "%x%"=="0" echo 必须输入两个字以上 && goto end call echo 截取为:%%var_bak:~0,%x%%% :end
对于lz要求长度的代码
@echo off set /p var=请输入: set var_bak=%var% set count=0 :loop if "%var%"=="" goto jump set var=%var:~0,-1% set /a count=%count%+1 goto loop :jump set /a x=%count%/2*2 if %x% GEQ 8 set x=8 if "%x%"=="0" echo 必须输入两个字以上 && goto end call echo 截取为:%%var_bak:~0,%x%%% :end
两个的差别只有
if %x% GEQ 8 set x=8

作者: bjsh     时间: 2007-3-18 05:15
对于特殊字符有这样的有趣的现象 例如 请输入:^1245 4 这里是数的字符个数;前面加了^后面居然数成了4 截取为:1245 请输入:1234567&89。 这里中间加了个&后面出了这么一大片错 '89' 不是内部或外部命令,也不是可运行的程序 或批处理文件。 '8' 不是内部或外部命令,也不是可运行的程序 或批处理文件。 8 这里是数的字符个数,显然&被算入在内了 截取为:1234567 请输入:1234567& 8 截取为:1234567 本来程序是输出偶数个的输出了7个;也就是说&算"隐藏"了 [ Last edited by bjsh on 2007-3-17 at 04:16 PM ]

作者: xycoordinate     时间: 2007-3-18 05:50
Originally posted by bjsh at 2007-3-17 15:38: 二楼的数字符的也太复杂了吧; @echo off set /p var=请输入: set count=0 :loop if "%var%"=="" ( echo %count% goto :eof ) set var=%var:~0,-1% set /a count+=1 goto loop pause
的确比2楼的容易理解! 我想问: 能从var变量前面截取,然后再判断吗???

作者: bjsh     时间: 2007-3-18 07:14
可以啊; set var=%var:~1%

作者: yangzhiyi     时间: 2007-3-18 09:06
谢谢解答 设置 count 有什么用啊,没看明白,能解释详细点吗 @echo off set /p var=请输入: set var_bak=%var% set count=0 :loop if "%var%"=="" goto jump set var=%var:~0,-1% set /a count=%count%+1 goto loop :jump set /a x=%count%/2*2 if %x% GEQ 8 set x=8 if "%x%"=="0" echo 必须输入两个字以上 && goto end call echo 截取为:%%var_bak:~0,%x%%% :end

作者: yangzhiyi     时间: 2007-3-18 09:18
一开始我写的是这个样,想想下太长,还是五楼的代码好。 @echo off :start set var= set /p var=请输入: :0 if "%var%"=="" echo 不能为空且要两个字以上 & pause >nul & goto start set var=%var:~0,4% :1 set var2=%var:~0,1% if "%var%"=="%var2%" echo 必须输入两个字以上 & pause >nul & goto start :2 set var2=%var:~0,2% if not "%var%"=="%var2%" goto 3 set mane=%var2% goto end :3 set var2=%var:~0,3% if not "%var%"=="%var2%" goto 4 set var2=%var:~0,2% set mane=%var2% goto end :4 set var2=%var:~0,4% if not "%var%"=="%var2%" goto 5 set mane=%var2% goto end :5 echo 输入参数异常 pause goto start :end echo %mane% 下午再写成这样, @echo off :start set var= set /p var=请输入两个或四个中文字(会自动截取成最大四个字的偶字数): if "%var%"=="" echo 不能为空且要两个字以上 & pause >nul & goto start set var=%var:~0,4% echo %var% | find "一二三" >nul && echo 保留字符不允许使用 && pause >nul && goto start set var1=%var%一二三 set var2=%var1:~1,3% if "%var2%"=="一二三" echo 必须输入两个字以上 & pause >nul & goto start set var=%var:~0,4% set var2=%var1:~0,4% if "%var%"=="%var2%" set mane=%var2% & goto end set var=%var:~0,2% set var2=%var1:~0,2% if "%var%"=="%var2%" set mane=%var2% & goto end :end echo %mane% 没办法我完全不会 for 命令

作者: bjsh     时间: 2007-3-19 00:40
Originally posted by yangzhiyi at 2007-3-17 08:06 PM: 谢谢解答
别客气;大家相互学习相互交流吗
设置 count 有什么用啊,没看明白,能解释详细点吗
设置count的作用是为了数变量中字符的个数; 利用set x=%count%/2*2 取偶数 利用 call echo %%var:~0,%x%%%来试现你要的效果;

作者: zh159     时间: 2007-3-19 01:56
来个简化些的任意长字符
@echo off
set var=
set /p var=请输入: 
set var_bak=%var%
set count=0

:loop
if not "%var%"=="" set var=%var:~1%&set /a count+=1&goto loop

set /a count=%count%/2*2
if %count% GTR 1 (call echo 截取为: %%var_bak:~0,%count%%%) else echo 必须输入两个字以上
pause
exit