标题: [已经自我解决]字符排列问题 [打印本页]
作者: victor888 时间: 2009-6-2 21:12 标题: [已经自我解决]字符排列问题
现在有如下问题：
str1=A1 B2 C3 D4
str2=3 1 4 2
现在str2变成了
st2=3 1 4 2
要求得到
str3=C A D B
＝＝
解法：
setlocal enabledelayedexpansion
set str1=A1 B2 C3 D4
set str2=3 1 4 2
for %%a in (!str2!) do (
for %%b in (!str1!) do (
set num=%%b
set num1=!num:~0,1!
set num2=!num:~1,1!
if /i %%a equ !num2! (
call set str3=%%str3%% !num1!
set str1=!str1:num=!
)
)
)
[ Last edited by victor888 on 2009-6-2 at 22:09 ]
作者: jmz573515 时间: 2009-6-2 22:23
@echo off&setlocal enabledelayedexpansion
set str1=A B C D
set str2=3 1 4 2
for %%a in (%str1%) do (
set /a n+=1
set a!n!=%%a
)
for %%i in (%str2%) do (
call set str3=!str3!%%a%%i%%
)
set str3=!str3:~0,-1!
echo !str3!
pause
set str1=A B C D
set str2=3 1 4 2
for %%a in (%str1%) do (
set /a n+=1
set a!n!=%%a
)
for %%i in (%str2%) do (
call set str3=!str3!%%a%%i%%
)
set str3=!str3:~0,-1!
echo !str3!
pause
作者: huahua0919 时间: 2009-6-2 22:29
类似与关联数组,如果用VBS会更好解些
@echo off&setlocal enabledelayedexpansion
set str1=A B C D
set str2=1 2 3 4
set str3=%str1:~,1%%str2:~,1% %str1:~2,1%%str2:~2,1% %str1:~4,1%%str2:~4,1% %str1:~6,1%%str2:~6,1%
set /p x=請輸入str2變換后的格式如:(3 1 4 2)
for %%i in (%x%) do (
for %%a in (%str3%) do (
set m=%%a
if "%%i"=="!m:~1,1!" set n=!n!!m:~,1!
)
)
echo %n%
pause
set str1=A B C D
set str2=1 2 3 4
set str3=%str1:~,1%%str2:~,1% %str1:~2,1%%str2:~2,1% %str1:~4,1%%str2:~4,1% %str1:~6,1%%str2:~6,1%
set /p x=請輸入str2變換后的格式如:(3 1 4 2)
for %%i in (%x%) do (
for %%a in (%str3%) do (
set m=%%a
if "%%i"=="!m:~1,1!" set n=!n!!m:~,1!
)
)
echo %n%
pause