1樓：天一弦劍
:begin
clsset /p dishnum=請輸入您要做幾道菜(預設回車3):
rem #####設定預設菜數#####
if not defined dishnum set dishnum=3
rem ########選單##########
set dish=涼拌黃瓜,紅燒茄,番茄炒雞蛋,瓜絲兒,山雞丁兒,拌海蜇,龍鬚菜,熗冬筍,玉蘭片,澆鴛鴦,燒魚頭,燒檳子,燒百合,炸豆腐,炸麵筋,糖熘兒,糖燜蓮子,杏仁酪,小炒螃蟹,海鯽魚,黃花魚,扒海蔘,扒燕窩,扒雞腿兒,扒雞塊兒
clsset rsh=
set i=0
:loop
set /a numof=%random%%%25+1
set /a i+=1
if %i% lss %dishnum% goto loop
echo 以下便是為您隨機抽取你要做的%dishnum%道菜:
echo %rsh%
remset /p select=請選擇操作(y,繼續選菜;n,退出):
if /i %select%==y goto begin else (
call exit
)rem 這是我寫的，你可以參考一下，不過用隨機數可能出現重複的菜，體彩生成器肯定是有重複的號碼的!
我又改進了一下,這下絕對不會選到重複的菜了,
**如下:
@echo off
title 自助炒菜生成器
:begin
color 5f
clsset dish=,涼拌黃瓜,紅燒茄,番茄炒雞蛋,瓜絲兒,山雞丁兒,拌海蜇,龍鬚菜,熗冬筍,玉蘭片,澆鴛鴦,燒魚頭,燒檳子,燒百合,
炸豆腐,炸麵筋,糖熘兒,糖燜蓮子,杏仁酪,小炒螃蟹,海鯽魚,黃花魚,扒海蔘,扒燕窩,扒雞腿兒,扒雞塊兒,
set dishnum=
set select=
set /p dishnum=請輸入您要做幾道菜(預設回車3,最大25):
rem #####設定預設菜數#####
if not defined dishnum set dishnum=3
clsset rsh=
set i=0
set r=25
echo 正在為您選菜,請稍後...
:loop
set /a numof=%random%%%%r%+1
timeout/t 0 >nul
call set dish=%%dish:,%judge%,=,%%
set /a r-=1
set /a i+=1
echo 為您隨機選擇的第%i%道菜為:%judge%
if %i% lss %dishnum% (if %r% gtr 0 (goto loop) else (goto error)) else (goto result)
rem 結果輸出
:result
echo 選菜結束,按任意鍵顯示清單...&pause>nul
color 0b
clsecho 以下便是為您隨機抽取你要做的%dishnum%道菜:
echo.
set/p a=nul
goto begin
2樓：
又寫了個不會生成重複隨機數的
@echo off
color 5f
title 自助炒菜生成器
set /a a=100
setlocal enabledelayedexpansionset /p b=請輸入您要做幾道菜：
for /l %%i in (1 1 %b%) do (call :getnum
call :!var!
)pause>nul
:getnum
set var=%random:~-2%
if not defined %var% (set "%var%=a"
goto :eof)
call :getnum
:01echo 01
goto :eof
:02echo 02
goto :eof
:03echo 03
goto :eof
————————————————————————終於看懂了，怪不得這麼慢，呼叫自己多次，sort多次————————————————————
你給的這個看不太懂，重寫了個，後面的標籤自己往上添吧，就是01，02那些，有問題hi我
@echo off
color 5f
title 自助炒菜生成器
setlocal enabledelayedexpansionset /p b=請輸入您要做幾道菜：
for /l %%i in (1 1 %b%) do (call :!random:~-2!
)pause
exit
:01echo 01
goto :eof
:02echo 02
goto :eof
:03echo 03
goto :eof
求高手幫忙寫一個刪除excel**第一行的批處理**。。萬分感謝！！！
3樓：快戀紅
點那一行的隨便一格，然後單擊右鍵會有刪除單元格.然後刪除整行就可以了
4樓：匿名使用者
是多個sheet還是多個檔案的某個特定表？
假設一個檔案中的所有sheet刪除第一行，公
5樓：浩哥奕弟
sub abc()
dim sht as worksheet
for each sht in sheetssht.rows(1).delete
next
end sub
求批處理for命令的完整講解，批處理 for命令後的do，如果要執行多條命令，如何寫？
for命令 for命令的作用是對一組檔案中的每一個檔案執行指定的命令。該命令可用在批處理檔案中，也可命令提示符下呼叫。1.引數 for在批處理程式中的使用格式如下 for 變數 in 集合 do命令 命令引數 for 在命令提示符下的格式如下 for 變數 in 集合 do命令 命令引數 變數或 變...
用批處理處理垃圾，用批處理處理垃圾檔案
你將會看到一個批處理程式，基本上由del和for兩個命令組成。基本框架和原理是很簡單的 用for來迴圈所有的驅動器和目錄，用del來刪除目標檔案。先看一下 for i in c d e do cd d i for j in filename1,filename2,filename3 do del j...
批處理命令start的問題，批處理命令start的問題
一諾千金丨 start 啟動單獨的 命令提示符 視窗來執行指定程式或命令。如果在沒有引數的情況下使用，start 將開啟第二個命令提示符視窗。語法 start title dpath i min max wait b filename parameters 引數 title 指定在 命令提示符 視窗...