set str1=abcdefghijklmnopqrstuvwxyz
set str2=ABCDEFGHIJKLMNOPQRSTUVWXYZ
:main
cls
set str=
set /p str= 請輸入字符串(退出請直接按回車):
if not defined str exit
cls
echo.
echo 轉換前:"%str%"
echo.
for /l %%i in (0,1,25) do (
call set char1=%%str1:~%%i,1%%
call set char2=%%str2:~%%i,1%%
call :change
)
echo ____________________________________________
echo.
echo 轉換後:"%str%"
echo.
echo 按任意鍵進行下一次演示...
pause>nul
goto main
:change
call set "str=%%str:%char1%=%char2%%%"
goto :eof
想問問Call Set xxxx 有什麼作用呢?
set str2=ABCDEFGHIJKLMNOPQRSTUVWXYZ
:main
cls
set str=
set /p str= 請輸入字符串(退出請直接按回車):
if not defined str exit
cls
echo.
echo 轉換前:"%str%"
echo.
for /l %%i in (0,1,25) do (
call set char1=%%str1:~%%i,1%%
call set char2=%%str2:~%%i,1%%
call :change
)
echo ____________________________________________
echo.
echo 轉換後:"%str%"
echo.
echo 按任意鍵進行下一次演示...
pause>nul
goto main
:change
call set "str=%%str:%char1%=%char2%%%"
goto :eof
想問問Call Set xxxx 有什麼作用呢?
