使不規則化
Set d = CreateObject（“腳本。詞典》）
for i=1到5
d添加CSTR（I），int（RND * 10）+1‘隨機數存儲在對象中。
然後
same_count=0
a = d .鑰匙
For i = 1到3
對於j = i+1到4
如果d項（a（I））= d項（a（j）），則
same_count=same_count+1
如果…就會結束
然後
然後
如果相同計數& lt& gt0然後msgbox =“& amp times =“&；相同計數
我不記得在哪裏下載了這個教程。希望對妳有用。
壹本在黑客界引起轟動的新秀教材——《跟我學編程》系列。
跟我學編程系列。
Memento mori在原黑白新區的帖子！貼出來給大家學習！！！
發現大多數黑白朋友不會編程並不是壹件好事，所以這次我寫了壹個簡單的編程教程並談到了VBScript。它主要是針對新手的，所以知道如何編程的朋友不會浪費時間。如果妳想接觸以下VBScript，這是可以的，但由於妳有編程基礎，所以直接找壹些參考書閱讀會更快。
什麽是VBScript？VBScript的全稱是Microsoft Visual BASIC Script Editon。正如其文字信息所揭示的那樣，VBS（VBScript的進壹步縮寫）是壹種基於Visual Basic的腳本語言。讓我進壹步解釋壹下。Microsoft Visual Basic是微軟公司生產的壹套可視化編程工具。語法基於Basic。腳本語言，即源代碼直接由主機解釋和執行，而不編譯成二進制文件。簡單地說，您編寫的程序不需要編譯成。exe，而是直接發送。vbs傳遞給用戶，用戶可以執行它。
我知道新手最關心的是使用什麽工具來開發VBS程序。答案是:記事本。我沒開玩笑。事實上，任何類型的文本編輯器都可以用來開發VBS，但記事本是系統自帶的，相對容易找到。盡管如此，我還是建議您下載專業的文本編輯器，因為這些工具可以提供“語法突出顯示”等功能，開發起來更方便，無論您使用哪種工具。
好了，我們先寫個VBScript程序預熱壹下。
雷姆打字並重復妳的名字。
使用InputBox和Msgbox函數。
暗淡的名字，消息
Msg=“請輸入您的姓名:“
Name=Inputbox（消息，“Name”）
Msgbox（名稱）
將上述程序列表輸入記事本，然後將其保存為擴展名為的文件。vbs（在“保存類型”中選擇“所有文件”）。然後雙擊運行並觀察運行結果。註意:請自行輸入節目單，不要復制-& gt；糊！
讓我解釋壹下這個程序。第壹行和第二行分別以“REM”語句和“‘”開頭。這兩個東西具有相同的功能，表明這壹行是註釋行，也就是說，這兩行除了說明此程序的功能和版權信息之外什麽也沒有做。註釋行是程序最重要的部分之壹。雖然不是必要的，但對其他人來說，自己閱讀源代碼並分析源代碼是非常有益的。
Dim用於聲明變量。在VBS中，變量類型並不那麽重要，也就是說，VBS將幫助您自動識別變量類型，並且變量在使用前不必聲明，並且程序將動態分配變量空間。在vbs，妳不用考慮名字存儲的是整數還是小數（學名是“浮點數”），也不用考慮它是否是字符串（壹串字符，例如“Hello World”），VBS會自動幫助妳。所以第三句可以刪掉，效果不會變，但我強烈反對。變量的基本原則是:先聲明，再使用。變量名以字母開頭，可以使用下劃線和數字，但不能使用VBS定義的詞，如dim或純數字。
下壹行稱為“賦值”，“=”是賦值符號，而不是數學中的等號，盡管看起來是壹樣的。這是壹種正統的理解，妳應該明白這沒有錯。賦值號的左邊是變量，右邊是要賦給變量的值。賦值後，變量msg相當於程序中的字符串“Please enter your name:”但當msg再次被復制時，原始值將消失。不僅是字符串，任何其他變量都是以這種方式賦值的，例如:a=2，b=12.222等等。
再往下，Inputbox和Msgbox是VBS的內置功能。函數相當於壹個有輸入（參數）和輸出（返回值）的“黑盒”。妳不需要知道函數是如何工作的，只要知道函數能做什麽就行了，我們可以定義自己的函數，但這要等到以後了。現在我們只需要知道壹個函數可能有也可能沒有返回值。妳可以有參數，也可以沒有。例如，InputBox是壹個具有返回值的函數。我們使用賦值號左邊的變量來“連接”inputbox的返回值——也就是您輸入的內容。Inputbox右側的括號中是參數列表，每個參數由“、”分隔，每個參數有不同的功能。例如，第壹個參數將顯示在提示中。我們將變量msg作為第壹個參數傳遞給Inputbox函數，並且msg=“請輸入您的姓名:“，因此我們將在對話框的提示欄中看到“請輸入您的姓名:”字樣。第二個參數是對話框的標題，我們將其傳遞給帶有直接量的函數（學名“常量”，這裏是“字符串常量”）。當然，妳也可以傳遞變量。Inputbox有許多參數。例如，如果您在“名稱”後面添加了壹個“，”字符，然後輸入壹個隨機字符串（用雙引號括起來的字符串稱為字符串）並運行它以查看結果。您會發現用於輸入的文本框有壹個默認值，它是第三個參數的函數。
Msgbox函數用於輸出，在VBS中沒有特殊的輸出函數（在BASIC中為Print，在C中為printf），因此我們只能通過對話框觀察輸出結果。Msgbox只有壹個必要參數，即要輸出的內容。在這種情況下，我們不需要關註Msgbox的返回值。我們將在未來討論msgbox和Inputbox，我們今天只是熱身，就這樣。
關鍵點:
1）註釋行（以REM或‘‘開頭）在程序中沒有任何作用，但它們可以使其他人更容易理解您的程序。
2）變量就像壹個盒子，或者壹個代碼，可以代表妳想代表的東西。變量賦值使用“=”。
3）用“”包裝的字符稱為“字符串”
4）函數就像壹個有參數和返回值的“黑盒”。您可以用“=”左邊的變量捕捉返回值。
5）Inputbox函數彈出輸入對話框，Msgbox用於輸出。
家庭作業:
測試Inputbox的第三個參數。
2）寫壹個程序輸出妳的年齡。
3）寫壹個程序，輸入三次。分別輸入您和您父母的姓名（需要提示）並輸出三次。
第二條:
沒想到第壹次作業就有人不會做。
似乎我們必須非常非常詳細。好了，今天我們就來聊壹聊各種“量”和基本運算。
先說常數。這個比較簡單。
什麽是常數？常數是壹個值不能改變的量。
常數有兩種:壹是自然常數。之所以這樣稱呼是因為它們本身就是常數。如何改變21的值？他永遠是21，不可能變成46。
如果在程序中使用“21=46”，這樣的語句將導致錯誤。同樣，字符串是常數（還記得字符串嗎？《妳好世界》就是壹個例子。如果妳使用“Hello World”=“Bye”這個句子，也會導致錯誤。妳能舉出更多自然常數的例子嗎？
其次，我們定義自己的常數。該數量也使用代號，並為其指定值。但是變量的不同之處在於它們在定義時就被賦值了，並且以後不能更改。如果我們試圖改變它們，我們將導致錯誤。要定義變量，我們使用關鍵字“const”（該關鍵字表示系統定義了具有特殊功能的單詞，不能用作變量名或常量名）。格式為:const。
例如:
const PI=3.1415926
const NAME =“memento mori“
這樣，我們就定義了兩個常數，PI和NAME。壹般來說，常數的名字都是大寫的，但妳不必這樣，隨妳便。將程序中壹些不需要更改的值定義為常量是壹個好習慣，這可以防止不必要的意外。此外，使用自定義常數還可以減少您的工作量。例如:
msgbox（“Hello World”）
msgbox（“Hello World”）
msgbox（“Hello World”）
msgbox（“Hello World”）
msgbox（“Hello World”）
這個程序輸出Hello World五次。如果妳想把輸出改為再見，妳必須修改所有的程序。當然，妳可以手動修改它們五次，但如果妳想輸出1000次呢？常數可以為我們解決這個問題:
const HW =“Hello World“
msgbox（硬件）
msgbox（硬件）
msgbox（硬件）
msgbox（硬件）
msgbox（硬件）
所以當妳想修改輸出時，只需修改hw的值。
好了，現在我們來看看編程的第壹個重要“基石”:變量。我認為解釋變量的最好方法是“盒子”。變量就像壹個盒子，只能裝壹樣東西。當妳想把其他東西放進去的時候，妳必須把原來的東西拿出來。這個“盒子”有壹個名字。當妳在程序中使用變量時，系統會打開盒子取出裏面的內容並讓它們參與處理。不是盒子。有些語言非常依賴於盒子裏的東西，這樣我們就可以找到壹個合適的“盒子”（例如C語言），但VBS為我提供了壹個可以自動擴展和收縮的“魔盒”，因此我們不必關心盒子裏有什麽。
VBS將自動調整框的大小。例如:
Dim a1、a2、a3
a1=14
a2=12.23
a3=“妳好“
而不是像C語言那樣麻煩，或者VB的正式語句（VB可以聲明也可以不聲明）:
int a 1；Dim a1作為整數
浮動a2；將a2設為雙精度
char * a3將a3標註為字符串
a 1 = 14；a1=14
a2 = 12.23；a2=12.23
a3=“妳好”；a3=“妳好“
良好的...那是題外話...
變量有什麽用？哇，那非常有用。最簡單的是妳不能在程序運行時確定變量的值。例如，我們在前壹課中編譯了壹個輸入姓名的程序，而您無法確定InputBox返回的內容（還記得Inputbox的返回值嗎？就是妳輸入的內容），所以妳無法應對各種情況，但我們使用“盒子”名稱將用戶的名字放上去，當我們使用它時，我們只需要知道盒子的名稱，系統就會打開它並取出裏面的內容。再舉壹個例子，我們編寫壹個程序來計算壹個矩形的面積，比如這個程序要發給小學生:
暗淡a、b、s
a=15
b=12
s=a*b
msgbox
這樣，我們就可以求出壹個長為15、寬為12的矩形的面積。是不是很簡單？當然，這個程序也可以這樣寫:
暗淡年代
s=15*12
msgbox
看起來程序要短得多，而且節省內存，但不鼓勵這樣做。為什麽？請看下文。
現在，我們的程序必須看起來像壹個點。誰的程序必須經過他人修改才能使用？
所以，我們必須接受用戶輸入，還記得嗎？InputBox函數。
修訂後的程序如下:
暗淡a、b、s
A=inputbox（“請輸入矩形的長度:“）
B=inputbox（“請輸入矩形的寬度:“）
s=a*b
msgbox
好了，通過這個修改，無論用戶輸入什麽數據，我們都可以計算矩形的面積。用s=15*12能改嗎？當然不是。
我想妳已經發現vbs中的數學計算與真正的算術沒有什麽不同。+、-、*、/、（）、【】、{}的用法都相同，例如:
dim ans
ans = 12+32/4+【（23-10）* 2】
msgbox（ans）
四則運算法則在編程中同樣有效，妳可以在編程中重拾小學的樂趣（妳討厭數學嗎？那就不要學計算機。
編程中壹個有趣的運算符是“mod”。該運算符稱為“余數運算符”，用於獲得除法的余數，例如
暗淡的
a=16 mod 5
妳知道a等於什麽嗎？答對了。是的，是1。因為16/5 = 3...1，mod計算的結果是1。
另壹個運算符是““（即鍵盤上的小箭頭“6“），意思是“冪“（或“方“），例如:
尺寸a、b、c
a=2
b=a^2
c=a^3
msgbox（a）
消息框（c）
那麽b = a * a = 4，c = a * a * a = 8。
我們壹次不要說太多。這次我們就此打住，現在總結壹下。
關鍵點:
1）常量分為自然常量和用戶自定義常量，常量的值不能修改。
2）變量就像盒子。我們不在乎盒子裏有什麽，但我們必須知道盒子的名字。
3）編程中的四種操作沒有區別。
4）MOD是余數運算。
家庭作業:
1）編寫程序計算圓的面積，半徑由用戶給定（使用InputBox），pi值為3.14159。
2）寫壹個程序來得到20/3的余數。
第三篇（* * *六篇）:
首先，讓我在最後壹節課解答壹些問題。
首先是余數問題，16/5 = 3...1，是因為我改了前面的部分，忘了改後面的部分。抱歉。
其次，請看看節目單:
1)
尺寸a、b、c
a = inputbox（“a是:“，“輸入半徑“）
b = Inputbox（“b是:“，“輸入半徑“）
c=a*2+b*2
消息框（c）
這個輸入1，2等於6。
2)
尺寸a、b、c
a = inputbox（“a是:“，“輸入半徑“）
b = Inputbox（“b是:“，“輸入半徑“）
c =（a+b）* 2
消息框（c）
這個輸入1，2是24。
為什麽不壹樣？在數學上，c =（a+b）* 2和c=a*2+b*2是等價的，在VBS也是如此。問題出在“+”上。在VBS，+不僅意味著加號，還意味著連接兩個字符串，例如，“妳好”+“世界”=“妳好世界”有妳未知的嗎？妳還記得InoutBox函數的返回值嗎？這是壹個字符串，說明了問題。在編程中，“1”不等於（
如何修改這個程序？我們需要使用另壹個內置函數:int。int函數的作用是將輸入值轉換為int，int為整數值。我們將其修改如下:
c =（int（a）+int（b））* 2
這意味著將a作為參數傳遞給int函數，int函數將返回該整數（您的輸入值），然後讓返回值參與運算，從而獲得正確答案。因此，如果您將來使用inputbox函數，最好用int語句處理它:例如，c = int（c）‘c是您自己的變量。
妳覺得這門課有點無聊嗎？呵呵，變量和運算符部分確實是這樣的，不過多練習還是不錯的。這壹次，讓我們寫壹些真正有趣的東西:過程控制語句。這部分是真正的編程開始。
首先介紹了判決結構。
在此之前，我們先介紹壹個簡單的變量類型:Boolean，它只有兩個可能的值:true和false。這個變量在某些情況下非常有用（例如“開關”）。我們以與其他變量相同的方式定義bool變量，並且賦值是相同的，例如:
維度a，b
a =真
b =假
註意，true和“true”是不同的，“true”是字符串，true是布爾值，千萬不能混淆。
回到if語句，我們來看看if語句的簡化版:if判斷then語句的主體。讓我們看壹個例子:
維度a，b
a=12
b=13
如果b & gta then msgbox（“B大於a“）
我們只看最後壹行，a & gt公式（表達式）b有壹個返回值，該值為bool類型。因為這個公式中只有兩種可能性:B大於A和B不大於A，所以這個公式中只有兩種可能性，即真或假。如果該表達式的返回值為true或false，則將執行其後的語句。如果為假，則不會執行。將A的值更改為65438。
判斷後想執行多行語句時應該怎麽做？我們需要用語句塊來解決它，這裏可以稱為block if。
維度a，b
a=12
b=13
如果a & ltb那麽
msgbox（“A小於B“）
msgbox（“B大於a“）
如果…就會結束
兩個msgbox函數夾在if和end if之間，這部分是語句塊。請離開4-8（a
暗淡的
A=inputbox（“請輸入壹個大於100的數字”）
a = int（a）‘inputbox返回壹個字符串，我們將其轉換為壹個整數:）
如果a & gt100然後msgbox（“正確”）
如果a & lt100然後msgbox（“錯誤“）
還有壹個更簡單的。
暗淡的
A=inputbox（“請輸入壹個大於100的數字”）
a = int（a）‘inputbox返回壹個字符串，我們將其轉換為整數。
如果a & gt那麽100
Msgbox（“正確”）
其他
Msgbox（“錯誤”）
如果…就會結束
看到另壹個了嗎？else的作用是當要判斷的表達式為假時執行。這樣，程序可以處理兩種不同的情況。別忘了用end if結尾。
嘿，嘿，我是個變態現在我要妳處理三種情況。《100，=100，& gt100，而且還是用壹個if結構寫的，妳怎麽辦，我給妳答案:
暗淡的
A=inputbox（“請輸入壹個大於100的數字”）
a = int（a）‘inputbox返回壹個字符串，我們將其轉換為整數。
如果a & gt那麽100
Msgbox（“正確”）
那麽elseif a=100
Msgbox（“老板，妳在開玩笑嗎？”)
其他
Msgbox（“錯誤”）
如果…就會結束
這次輸入100。這是什麽？Else if語句可以在if結構中多次出現，以便靈活判斷不同的情況（如果要判斷太多，請使用“選擇結構”稍後再談），然後在所有Else if都已處理完畢，但不符合情況時執行else中的語句。另壹個例子:
尺寸a、b、c、d
a = inputbox（“a是:“，“輸入半徑“）
b = Inputbox（“b是:“，“輸入半徑“）
D=Inputbox（“答案:“，“輸入答案“）
c = a* 2+b * 2‘這裏沒有問題，會自動轉換。
如果d=c，那麽
Msgbox（“妳真聰明”）
其他
Msgbox（“豬頭妳好，妳自己的題還學不會呢！”" )
如果…就會結束
再看看這個。不管妳的答案有多正確，妳都是豬頭。哈哈，我不是在忽悠妳，還是文章開頭inputbox的返回類型在忽悠妳。d是inputbox的返回值，它是壹個字符串，C是整數計算的結果，它是壹個整數。無論如何，字符串不等於整數，盡管它們在字面上是相同的:“8”
尺寸a、b、c、d
a = inputbox（“a是:“，“輸入半徑“）
b = Inputbox（“b是:“，“輸入半徑“）
D=Inputbox（“答案:“，“輸入答案“）
d = int（d）
這裏我們取出d的值，將其轉換為整數，並將其放回“d”的框中
c=a*2+b*2
如果d=c，那麽
Msgbox（“妳真聰明”）
其他
Msgbox（“豬頭妳好，妳自己的題還學不會呢！”" )
如果…就會結束
這是成功的。這也是Inputbox函數的壹個缺點。vbs沒有其他好的輸入法。
說到if，就不得不說說邏輯運算符。今天，我將介紹兩種，“與”和“或”。學會if語句後，我給妳舉個例子，妳壹看就懂了。
維度a，b
A=inputbox（“輸入壹個數字》；10")
B=inputbox（“輸入另壹個數字》；10")
a = int（a）
b = int（b）
如果a & gt10和b & gt那麽10
Msgbox（“正確”）
其他
Msgbox（“錯誤”）
如果…就會結束
該程序允許您輸入兩個值，這兩個值都必須大於10。只要1不大於，就會輸出錯誤。
維度a，b
A=inputbox（“輸入壹個數字》；10")
B=inputbox（“輸入另壹個數字》；10")
a = int（a）
b = int（b）
如果a & gt10或b & gt那麽10
Msgbox（“正確”）
其他
Msgbox（“錯誤”）
如果…就會結束
這個程序允許您輸入兩個值，只要其中壹個大於10，它就會返回成功。事實上，and和or很好理解。我讀了“如果a & gt10或b & gt在漢語中，“10然後”這句話是這樣的:“如果A大於10或B大於10，則...“這容易理解嗎？
好的，讓我們再來看壹個新的結構。今天的課結束了。午夜了。我累壞了。
當妳的程序必須處理許多不同的判斷情況時，否則如果...那麽會使程序看起來很亂，所以有壹個select case結構來處理這種情況。select case的語法結構非常簡單:
選擇案例變量名
案例價值
句子
案例價值
句子
其他情況
句子
結束選擇
讓我們舉個例子來簡單解釋壹下:
暗淡的
A=inputbox（“輸入壹個值1-3“）
a = int（a）‘處理inputbox返回字符串的問題。
選擇案例a
案例1
Msgbox（“壹”）
案例二
Msgbox（“兩個”）
案例三
Msgbox（“三個”）
其他情況
Msgbox（“輸入錯誤”）
結束選擇
在這個例子中，三個阿拉伯數字1、2和3被轉換成中國大寫數字，並且這個程序是以if的形式編寫的...其他如下。
暗淡的
A=inputbox（“請輸入壹個1-3的值“）
a = int（a）
如果a=1那麽
Msgbox（“壹”）
那麽elseif a=2
Msgbox（“兩個”）
那麽elseif a=3
Msgbox（“三個”）
其他
Msgbox（“輸入錯誤”）
如果…就會結束
怎麽樣，請或選擇。
好了，今天就到這裏。總而言之:
關鍵點:
1）inputbox返回壹個字符串，而不是壹個數字，並且必須轉換為a = int（a）形式的數字。
2）bool變量只有兩個值:true和false。
2.5）如果和兩邊的表達式都為真，則返回true。或者如果兩邊的表達式中有壹個為真，它將返回true。
3）if語句的格式
4）選擇的格式...情況
家庭作業:
1）使用三個bool值存儲您的三個兄弟姐妹是否為男性（提示:sisters 1 male = false）。
2）給定壹個數字，如果大於10且小於20，則輸出“正確”，否則輸出“錯誤”。
3）輸入12或15，並輸出“正確”，否則輸出“錯誤”。
4）在中國將5以內的所有正整數轉換為更大的數字。
5）隨意設計壹個程序，應用今天的知識。
四篇文章（* * *六篇文章）:
大家好，我昨天休息了壹天，所以我今天寫了第四章:循環結構。
先來看壹個問題:商場的日結需要今天營業額的累計，壹次輸入壹個數字。這個問題其實很簡單，但是就我們而言。
用知識完成這道題挺麻煩的。我們來分析壹下。首先，我們需要知道交易的數量，從而控制輸入的數量。然而，這個假設
這個計劃效率很低，程序每天都要重新設計。假設今天有五筆交易，下面是源程序:
點心
“Sum=0”初始化變量。
sum = sum+int（inputbox（“請輸入交易金額“））
Sum=sum+x這種形式是取出自己的值，執行壹次運算，然後再放回去。這個方法很有用。
這裏使用了函數嵌套，inputbox的返回值直接傳遞給int函數並轉換為整數，下同。
sum = sum+int（inputbox（“請輸入交易金額“））
sum = sum+int（inputbox（“請輸入交易金額“））
sum = sum+int（inputbox（“請輸入交易金額“））
sum = sum+int（inputbox（“請輸入交易金額“））
msgbox（總和）
看，我通過復制計算過程五次來設計程序。如果符合以下條件，該程序仍可用於交易量較少的地方，如汽車交易所
超市裏不是要復制粘貼上千遍嗎？我們今天所談論的內容可以克服這壹缺陷。首先，讓我們談談以下幾點...循環語句。
do的結構...循環看起來很簡單，就是做...循環，僅此而已。這種結構在do和loop之間不斷執行語句（學名:循環體）。
永不停止。例如:
做
Msgbox（“此消息將重復出現。若要停止該程序，請使用任務管理器（Ctrl+Alt+Del）停止wscript進程“）
環
運行這個程序，當妳點擊關閉壹個對話框時，另壹個對話框會立即出來。妳永遠不會點擊完，總會有下壹個。誰來運行這樣壹個程序？除非是為了
其他人制造麻煩（我也做過這種事），所以在do中還有另壹種說法..循環結構:exit do，它將終止循環並跳轉到循環後的語句繼續。
執行。例如:
Dim註意:常量不需要在dim中聲明，否則會導致錯誤。
const pass =“123456““這是壹個字符串，請用““括起來。將密碼設置為常量且不能更改。
做
A=inputbox（“請輸入密碼”）
如果a =通過那麽
Msgbox（“密碼驗證成功”）
退出do
如果…就會結束
環
該程序將不斷要求您輸入密碼，直到您輸入正確的密碼。（if可以嵌套在另壹個if或循環體中。
，所以我們必須使用縮進來區分程序的各個部分）。這個節目非常經典，早期的節目都是這樣做的。但是我們是黑客，所以
我們知道系統的安全性。這種無限認證程序容易被徹底破解。我們必須限制身份驗證的次數。修改過程如下。
維度a，中心
Ctr=0設置計數器
const pass =“pas 123 _““上面的密碼是壹個弱密碼。這次換強壹點的。
做
如果ctr=3則
Msgbox（“已達到身份驗證限制，身份驗證過程已關閉”）
退出do
其他
A=inputbox（“請輸入密碼”）
如果a =通過那麽
Msgbox（“成功認證”）
Msgbox（“（您可以在此添加壹條成功信息）“）
退出do
其他
Ctr = CTR+1‘如果密碼錯誤，則將錯誤驗證計數增加壹次。
Msgbox（“驗證錯誤，請檢查密碼”）
如果…就會結束
如果…就會結束
環
試著運行這個程序。當您出現3次錯誤時，您將停止再次詢問密碼並關閉程序。telnet身份驗證是壹個限制次數的大得多的程序。
與小差異相同。註意嵌套的if語句。仔細閱讀這個程序，它可能很難理解。請嘗試自己設計壹個類似的程序。
事實上，如果沒有必要添加驗證功能怎麽辦...循環，我們可以直接使用do。我來介紹壹下while關鍵字，while可以放。
do或loop之後是壹個表達式，當表達式的值為true時（表達式成立），循環體運行。我們來看看改裝後的。
程序“
維度a，中心
ctr=0
const pass =“pas 123 _“
邊做邊按ctr & lt三
A=inputbox（“請輸入密碼”）
如果a =通過那麽
Msgbox（“成功認證”）
Msgbox（“（您可以在此添加壹條成功信息）“）
退出do
其他
Ctr = CTR+1‘如果密碼錯誤，則將錯誤驗證計數增加壹次。
Msgbox（“驗證錯誤，請檢查密碼”）
如果…就會結束
環
以這種方式實現的功能與前面的示例完全相同。讓我們來看看在弧圈後推桿:
維度a，中心
ctr=0
const pass =“pas 123 _“
做
A=inputbox（“請輸入密碼”）
如果a =通過那麽
Msgbox（“成功認證”）
Msgbox（“（您可以在此添加壹條成功信息）“）
退出do
其他
Ctr = CTR+1‘如果密碼錯誤，則將錯誤驗證計數增加壹次。
Msgbox（“驗證錯誤，請檢查密碼”）
如果…就會結束
ctr & lt三
功能是壹樣的，為什麽要放在循環後面呢？只需將ctr的值更改為3，後面的程序do while直接退出，但後面會循環。