Posted on 2010-05-17 10:21
S.l.e!ep.￠% 閱讀(995)
評論(0) 編輯 收藏 引用 所屬分類:
DOS
批處理， 小寫轉(zhuǎn)大寫
@echo?off
::?稍微修改一下代碼就可以實現(xiàn)大寫轉(zhuǎn)小寫
set?str1=abcdefghijklmnopqrstuvwxyz
set?str2=ABCDEFGHIJKLMNOPQRSTUVWXYZ
:main
cls
set?str=
set?/p?str=????請輸入字符串(退出請直接按回車)：
if?not?defined?str?exit
cls
echo.
echo????????????轉(zhuǎn)換前："%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????????????轉(zhuǎn)換后："%str%"
echo.
echo?????????????????????按任意鍵進行下一次演示
pause>nul
goto?main
:change
call?set?"str=%%str:%char1%=%char2%%%"
goto?:eof