happy886rr

回复 22# sishentibu
基本上就是按字符串分割的，所以会出现负号被分割的情况如-,300
还需要加一句!p1:-,=-!就更完美了。
这是改进后的

@echo off
setlocal enabledelayedexpansion
set /p num=输入数字:
:cut
if "!num!"=="" (
	set p1=!p1:-,^=-!
	echo !p1:~1! &pause>nul&exit
)
set p1=,!num:~-3!!p1!
set num=!num:~0,-3!
goto cut
复制代码

sishentibu

回复 21# happy886rr

你那割法是真巧妙，按我那写法，位数一多就抗不住了。
想了下，你这种写法，只要是有规律的分割都可以啊，不仅仅是数字

happy886rr

回复 20# sishentibu
对，0，-3那句就是去掉最后三个。自然就空了。

sishentibu

回复 18# happy886rr


抱歉，开始想错了。

set num=!num:~0,-3!
如果num只有2位数，是不是num就为空了？就是"!num!"=="" ？

WHY

@echo off & setlocal enabledelayedexpansion
set "n=-1234567890"
for /l %%i in (-18 3 -3) do set "n=!n:~0,%%i!,!n:~%%i!"
for /f "tokens=*delims=," %%i in ("%n%") do set "n=%%i"
echo;%n:-,=-%
pause
复制代码

sishentibu

回复 9# happy886rr

有个地方写错了。

    @echo off
    set a=1000052
    set /a b=a/1000
    set /a c=a/1000000
    if %b%==0 (echo %a%) else (
            if %c%==0 (echo %a:~0,-3%,%a:~-3%) else (echo %a:~0,-6%,%a:~-6,3%,%a:~-3%))
复制代码

最后一个echo改下就好了

happy886rr

回复 15# codegay

呵呵，就跟切菜一样。

codegay

哈哈，又撸了个python代码，处理全是数字应该没问题。

这个问题只要把判断并去掉正负号，然后把字符串翻转，这个问题就等于如何把一个字符串或者序列每3个切成一份。
>>> s="12345"
>>> ','.join([s[::-1][r:r+3] for r in range(0,len(s),3)])[::-1]
'12,345'
>>> 
复制代码

caruko

回复 3# ivor


    直接判断 >=1000  AND >= 1000000 不就行了

codegay

回复 12# CrLf


    提问的人估计超级不爽。

CrLf

突然觉得批处理之家已然成为各种脚本一锅乱炖的大杂烩...

依山居

python可以这样:

"{:,}".format(33333)
复制代码

happy886rr

回复 2# zhangenming
批处理也能完成这个任务，只是绕点，但是也完成了。兼容正负数，可以无限位数，也可以切割任意长度字符串。

@echo off
setlocal enabledelayedexpansion
set num=-14159265358979323846264338327950288314159265358979323846264338327950288
:cut
set p=!num:~-3!
if "!num!"=="" (echo !p1:~0,-1! & pause & exit)
set p1=!p!,!p1!
set num=!num:~0,-3!
goto cut
复制代码

最大可以切割5千多位的超级大数
运行实例

happy886rr

回复 5# sishentibu


  我发现1000052是个7位数，但是不兼容

WHY

.net 正则中有一个从右向左搜索的选项：

[regex]::Replace('1234567','(?<=\d)\d{3}', ',$&','RightToLeft')
复制代码