【文章內(nèi)容簡介】 強一點 do if ctr=3 then msgbox(已經(jīng)達到認證上限, 認證程序關(guān)閉) exit do else a=inputbox(請輸入密碼) if a=pass then msgbox(認證成功) msgbox((你可以在這里加一段成功后得到的信息)) exit do else ctr=ctr+1 39。如果密碼出錯就增加一次錯誤認證計數(shù) msgbox(認證出錯, 請檢查密碼) end if end if loop 　　運行這個程序試試看, 當(dāng)你出了3此錯誤以后, 就會停止再次詢問密碼, 關(guān)閉程序. telnet認證用來限制次數(shù)的程序與此大同小異. 要注意的是嵌套的if語句, 清仔細讀一下這個程序, 可能比較難懂, 也請你試著自己設(shè)計一下類似的程序. 　　其實, 要在do...loop加上驗證的功能, 并不一定要用if, 我們可以直接利用do. 我來介紹一下while關(guān)鍵字, while可以放在do或者是loop后面, 然后再接一個表達式, 當(dāng)表達式的值為true的時候(表達式成立), 程序 dim a,ctr ctr=0 const pass=pas123_ do while ctr3 a=inputbox(請輸入密碼) if a=pass then msgbox(認證成功) msgbox((你可以在這里加一段成功后得到的信息)) exit do else ctr=ctr+1 39。如果密碼出錯就增加一次錯誤認證計數(shù) msgbox(認證出錯, 請檢查密碼) end if loop dim a,ctr ctr=0 const pass=pas123_ do a=inputbox(請輸入密碼) if a=pass then msgbox(認證成功) msgbox((你可以在這里加一段成功后得到的信息)) exit do else ctr=ctr+1 39。如果密碼出錯就增加一次錯誤認證計數(shù) msgbox(認證出錯, 請檢查密碼) end if loop while ctr3 　　功能是一樣的, 為什么要放在loop后面呢? 你把ctr的值改成3就知道了, while在do后面的程序會直接退出, 而在loop后面還會允許一次認證, , 用法和while一樣, 不過他只有當(dāng)后面的表達式的值為false(表達式不成立)的時候才執(zhí)行循環(huán)體, 請自己試驗一下 　　ok, 我們來看另外一種循環(huán)結(jié)構(gòu),for....next, 這種循環(huán)結(jié)構(gòu)是基于計數(shù)的, 也是在編程中最常見到的循環(huán)結(jié)構(gòu). dim i for i=0 to 5 msgbox(i) next 　　看到了嗎?每次輸出的i都是遞增的, 但我們沒有明確指出i要遞增, 當(dāng)i達到5的時候, 循環(huán)就結(jié)束了, 因為由0開始, 所以循環(huán)體執(zhí)行了6次, 這一點很重要, 大部分東西都是從0開始而不是1. 這個程序也可以寫成 do的形式: dim i i=0 do while i5 msgbox(i) i=i+1 39。因為do不能自動計數(shù), 必須手動加 loop 　　怎么樣, 還是for比較好用吧. for在編程中很有用途, 我們再舉一個例子, 順便講一下嵌套循環(huán). dim i,j for i=1 to 9 for i=1 to 9 str=str amp。 i * j amp。 39。amp。是和并字符串的符號 next 39。每個next對應(yīng)一個for next 　　看看運行結(jié)果, 是否令你會想起小學(xué)時代的數(shù)學(xué)老師(丑陋的嘴臉). 要注意, 這里有一個大的for, 和一個小的for, 當(dāng)小的for執(zhí)行完一個周期以后, 大的for才執(zhí)行一次(換句話說, 大的for執(zhí)行一次, 小的要執(zhí)行9次), 所以一共執(zhí)行了九九八十 一次. 在大的for里可以不僅僅是一個小的for, 也可以加上另外的語句. 我們來修改一下源程序: dim i,j for i=1 to 9 for i=1 to 9 str=str amp。 i * j amp。 next 39。每個next對應(yīng)一個for str=str amp。 vbCrlf 39。vbCrlf相當(dāng)于鍵盤上的回車鍵,因為你不能在鍵盤上輸入,所以系統(tǒng)定義了一個默認的常量 next 　　這次運行完成以后, 輸出結(jié)果按照乘數(shù)進行了分割, 每小for運行完一次, 就換一行(通過vbcrlf). 　　這次的內(nèi)容對菜鳥可能比較難懂, 掌握的辦法只有一個:多實踐. 另外, 我在論壇看到很多人還是問:VBScript要用什么工具編?我就很氣憤, 我在第一篇里面已經(jīng)說明:用記事本編輯源代碼, , 請大家不要再問. 另外, 國產(chǎn)的一種垃圾軟件超級X霸搶占了vbs這個擴展名, 請把那個垃圾卸載掉. 　　我們總結(jié)一下: 要點: 1) do..loop和exit do的用法 2) while當(dāng)表達式true的時候執(zhí)行循環(huán)體,until反之 3) for...next是計數(shù)循環(huán), 每次執(zhí)行計數(shù)器遞加 4) 嵌套循環(huán)的作用和寫法 ) amp。用于連接字符串 5) vbCrLf相當(dāng)于鍵盤上的回車鍵 作業(yè): 1) 在我國的數(shù)學(xué)經(jīng)典著作九章算術(shù)中有這樣一道題:百錢買百雞, 公雞5錢一只, 母雞3錢一只, 小雞1錢2只(這個數(shù)據(jù)我是參考一本編程書的, 但我記得是公3,母1,小1錢3只? 不管了, 就按照書上得來吧)求得是能有多少種辦法買這些雞. 如果看不懂的話我用大白話說說:有人要去買雞, 用100塊錢正好買了100只雞, 價格如下:公:5$, 母:3$, 小:1$ for 2, 讓你求一共多少種賣法(公母小怎么搭配). 請用循環(huán)解決這個問題。PS：今天文章寫的很倉促，大部分代碼都沒有實驗，請大家自己檢驗。另外，上次的作業(yè)我不說答案了。不知道大家喜歡做這種題，還是以前那種比較簡單的？ 第五篇： 今天我們來了解語言本身的最后一個論題:數(shù)組. 　　要理解數(shù)組, 這個概念我覺得另一種翻譯對學(xué)習(xí)來說更加容易:陣列, 沒錯, 數(shù)組就是一個陣列, 一個數(shù)據(jù)的陣列. 最簡單的例子是數(shù)據(jù)庫系統(tǒng), 假設(shè)你要儲存20名學(xué)生的英語成績, 如果不是用數(shù)組, 你則要創(chuàng)建20個不同的變量, 累死. 數(shù)組就是類型相同(重要!)的一組數(shù)據(jù)(或者n組), 用來儲存相關(guān)的量, 最簡單的數(shù)組是一維數(shù)組, 我們就先來學(xué)習(xí)它吧. 　　什么是一維數(shù)組呢? 在3維以下,你可以利用幾何知識來理解維的概念,一維相當(dāng)于一條線, 二維則是一個矩形, 三維是一個長方體. 我知道這么講是很抽象的, 我們先舉個一維數(shù)組的例子就比較容易了解了. dim a(9) 39。從零開始 for i=0 to 9 a(i)=i 39。填充每一個數(shù)組元素 msgbox(a(i)) 39。輸出數(shù)組元素 next 　　我們可以看到, 定義一個數(shù)組的方法和定義一個變量沒有什么不同, 同樣是使用dim語句. 定義一維數(shù)組的方法如下: dim 數(shù)組名(元素數(shù)量), 這里大家要注意一點, 這里定義的元素數(shù)量總是比你要的要少一個, 因為一個數(shù)組的起點是0號數(shù)據(jù)而不是1, 所以大家一定要小心: 你需要10個數(shù)據(jù), 就定義9, 需要100個就定義99, 依此類推. 數(shù)組的元素可以看成一個個獨立的變量, 你可以像獨立的變量那樣使用他們. 數(shù)組元素的量可能是毫無關(guān)系的, 比如第一個數(shù)組元素儲存你的年齡, 第二個儲存今年西瓜的銷售量, 但這種做法是不鼓勵的, 甚至是不被接受的, 不要這么干, 這樣的情況請定義獨立的變量. for語句在數(shù)組中可算是大顯身手, 還記得for嗎? 它累加一個變量, 我們可以把這個變量應(yīng)用在數(shù)組中正好用來讀取或者填充按照順序排列的數(shù)組元素, 上面就是這樣一個例子. 數(shù)組其實是很簡單的東西(再BASIC語言里面), 數(shù)組難的是怎么搗弄這些循環(huán), 讓他們按照你的要求運轉(zhuǎn). 這個等到二維數(shù)組再說, 我們先看看如何手工填充數(shù)組. 　　如果你這個都想不到的話, 那你真是白學(xué)了: dim name(7),str 39。一共八個學(xué)生, str變量是用來把他們儲存成一個字符串以便輸出 for i=0 to 7 name(i)=inputbox(請輸入第 amp。 i+1 amp。 個學(xué)生的名字) str=str amp。 amp。 name(i) next msgbox(str) 　　這樣我們就有了一個小小的數(shù)據(jù)庫, 它們的數(shù)據(jù)排列可以看成這樣: 　　name(0),name(1),name(2).....name(7) 　　看到了吧, 所以我說我們可以把它看成是一條線, 等到我們學(xué)到了文件操作, 就可以把他們輸出到文件中去了. 一維數(shù)組有很多用處, 我們來看一下一個復(fù)雜的例子. 我們要儲存3各學(xué)生的名字, 身高, 成績這三種數(shù)據(jù), 由于名字是字符串, 而身高可能是浮點數(shù)(帶小數(shù)點的數(shù)), 成績則可能是整數(shù), 所以我們不能把他們儲存在一個數(shù)組里面(不要忘記, 數(shù)組織只能存儲同類的數(shù)據(jù)), 所以我們要建3個數(shù)組, 以下是例程: dim name(2), high(2), mark(2) 39。定義三個數(shù)組分別儲存3個人的名字, 身高和得分 dim ctr 39。計數(shù)器 for ctr=0 to 2 name(ctr)=inputbox(請輸入第 amp。 ctr+1 amp。 個學(xué)生的姓名) high(ctr)=inputbox(請輸入第 amp。 ctr+1 amp。 個學(xué)生的身高) mark(ctr)=inputbox(請輸入第 amp。 ctr+1 amp。 個學(xué)生的得分) next 　　OK, 我們已經(jīng)填充好了數(shù)據(jù), 現(xiàn)在我們的小小數(shù)據(jù)庫只能按順序輸入, 我們要讓它看起來像點樣子, 我們來給他設(shè)計查詢功能: 39。接著上面的程序 dim ame, temp 39。要查詢的名字, 和一個臨時變量, 用來儲存數(shù)據(jù)的位置 ame=inputbox(請輸入你要查詢的名字:) for ctr=0 to 2 39。遍歷所有name數(shù)組的成員, 尋找要查詢的名字 if name(ctr)=ame then temp=ctr 39。記錄數(shù)據(jù)位置 exit for 39。退出循環(huán), 和exit do的用法一樣 end if 39。不要忘了end if next msgbox(姓名: amp。 name(temp) amp。 amp。 身高: amp。 high(temp) amp。 amp。 得分: amp。 mark(temp)) 　　嘿嘿, 有意思吧, 其實在這個程序里面, 那個temp變量完全沒有必要, 只是為了更清楚地說明問題. 因為當(dāng)exit for以后ctr變量的值就不會改變, 儲存的正好是對應(yīng)數(shù)據(jù)在數(shù)組中的位置, 寫這個temp變量是為了照顧到以后要學(xué)C++的朋友(C++可以在for語句里聲明新變量, 只在這個for結(jié)構(gòu)中有效, 所以到了外部就不能訪問了). 也就是說可以簡化成如下: dim ame ame=inputbox(請輸入你要查詢的名字:) for ctr=0 to 2 if name(ctr)=ame then exit for 39。因為只有exit for就不需要塊if了 next msgbox(姓名: amp。 name(ctr) amp。 amp。 身高: amp。 high(ctr) amp。 amp。 得分: amp。 mark(ctr)) 　　這是最直接的路子. 好好重讀一下上面所有的源代碼, 然后自己寫幾個程序, 完全搞清楚一維數(shù)組及其應(yīng)用以后再看后面的二位數(shù)組. 二維數(shù)組好像是一個一維數(shù)組的集合, 就好像線積成面一樣, 由n各一維數(shù)組組成二維數(shù)組, 這是初學(xué)者比較好理解的辦法(比較精確的是用編號的概念去理解, 因為4維以上的數(shù)組就比較難以用歐幾里德幾何概念去解釋了). 二維數(shù)組是很好解釋的, 我們來看一下: dim a(2,2) 39。從零開始, 一共有3 X 3 = 9 個數(shù)據(jù) dim i,j 39。需要兩個計數(shù)器 for i=0 to 2 for j=0 to 2 39。使用嵌套循環(huán) a(i,j)=X next next 　　我們創(chuàng)建了一個這樣的二維數(shù)組(那些,是我用來分割元素的,并不存在), 了解二維數(shù)組的了嗎? 不清楚我們再講一下 編號 0 1 2 0 X,X,X 1 X,X,X 2 X,X,X 　　二維數(shù)組的看起來是不是就是一個矩形呢?(你在內(nèi)存中看不到這樣的矩形, 只是便于你理解), 每個數(shù)據(jù)都有編號, 由兩個數(shù)來定位, 這個很像(非常像)你在國際象棋棋盤上尋找一個格, 我們用類似C6,A2這樣的垂直坐標(biāo)進行定位, 對, 垂直坐標(biāo), 很確切. 我們要使用一個二維數(shù)組元素的時候可以和普通變量一樣使用, 只要指定數(shù)組元素的定位點就可以了, 例如 a(0)(1)=1, b(2)(1)=你好, 諸如此類. 要注意的是二維數(shù)組也只能儲存類型相同的元素, 而且上標(biāo)(起點)也從0開始. 計算一個二維數(shù)組的元素個數(shù)只要把兩個下標(biāo)+1(以得到實際的值)再乘起來就可以了, 非常類似于求一個矩形的面積. 　　假如需要儲存的都是同一類型的數(shù)據(jù), 我們就可以用二維數(shù)組, 比如要儲存5個人的姓名,國籍,民族, 就可以使用二維數(shù)據(jù) dim info(4,2) 39。一共五個人, 要儲存的數(shù)據(jù)類型有3項 dim i,j for i=0 t