整数转千分符显示
::整数字符转成千分符表示 :numToThousand <数字参数> [返回变量] (setlocal enabledelayedexpansion&set n=%~1 set len=0&for /l %%i in (0,1,1000) do if "!n:~%%i,1!."=="." set len=%%i&goto :breakFor :breakFor set nv=&for /l %%a in (1,1,%len%)do (set nv=!n:~-%%a,1!!nv!&set/a m=%%a%%3&if !m!==0 set nv=,!nv!) endlocal&(if %2.==. (echo %nv%) else set %2=%nv%) exit/b)
调用方式使用call调用
使用的技术
1)其中用到了循环的强制退出,如下:
set len=0&for /l %%i in (0,1,1000) do if "!n:~%%i,1!."=="." set len=%%i&goto :breakFor
当符合条件时,使用goto进行跳转出来。
2)取模运算(求余)
根据前面计算处理的数字字符串的长度,每三位增加一个逗号,所以需要模3来判断是否添加逗号
set nv=&for /l %%a in (1,1,%len%)do (set nv=!n:~-%%a,1!!nv!&set/a m=%%a%%3&if !m!==0 if not %%a==%len% set nv=,!nv!)