cjiabing

@echo off&setlocal enabledelayedexpansion
::随机组合一文本内的行与列。
::1到100行以内。若想扩大行数，需修改rda和rdb的set。
::以下是只提取每行的第一列，可以修改tokens和set提取更多列。
:cc
set va=
set /a rda=%time:~-2,2%+0
for /f "tokens=1  delims= " %%a in ('more +%rda% 通讯录（新）.txt') do set va=%%a&goto aa
goto cc
:aa
set vb=
set /a rdb=%time:~-2,2%+0
for /f "tokens=1  delims= " %%a in ('more +%rdb% 通讯录（新）.txt') do set vb=%%a&goto bb
goto cc
:bb
echo !va! !vb!
pause>nul
goto cc
复制代码