2012年計算機等級考試二級VB重點知識（十）

　　先看len、mid函數(shù)的使用：

　　有一個字符串 A="abcd"

　　(1) 則 len(A)=4 len(x) 可獲得x字符串長度。(一個漢字為2個字符)

　　(2)mid(x,n1,n2) :取子串函數(shù)

　　作用一：取子串：

　　mid(A,1,1)="a"

　　mid(A,1,2)="ab"

　　mid(A,3,1)="c"

　　從一個字符串中一個一個取出字符的方法：

　　for I=1 to len(x)

　　print mid(x,I,1)

　　next I

　　若逆序取出：

　　for I=len(x) to 1 step -1

　　print mid(x,I,1)

　　next I

　　作用二：改變一個字符串中某些字符。

　　mid(x,2,2)="k"

　　1.2循環(huán)嵌套：

　　for I= 1 to 2

　　fot j=1 to 3

　　print "b"

　　next j

　　print "a"

　　next I

　　程序舉例：P73

　　例

　　rnd(x)： 隨機函數(shù)的使用方法。

　　改變程序中rnd(X)中的X取值，觀察結果

　　Private Sub Form_click()

　　Print Rnd(1); Rnd(0)

　　End Sub

　　產(chǎn)生[a,b]范圍內隨機整數(shù)的公式：

　　int((b-a+1)*rnd+a)

　　例：生成5個3位隨機整數(shù)。

　　For I=1 to 5

　　Print int((999-100+1)*rnd+100)

　　Next I

　　自習 P74 各例

　　isNumeric(x) : 判斷一個字符串是否是一個數(shù)字串。

　　若x是數(shù)字串，其值為True ,若不是數(shù)字串，其值為False

　　2. do-loop 循環(huán)結構：

　　一般格式：4種

　　do while edo

　　……

　　[exit do][exit do]

　　……

　　looploop while e

　　格式一：

　　(1)先判斷e 的值，為 true，執(zhí)行循環(huán)體A，為false，循環(huán)結束，轉loop的下面一條語句去執(zhí)行。

　　(2)循環(huán)體執(zhí)行完后，執(zhí)行l(wèi)oop語句，返回(1)。

　　2.1例 :(補充)

　　求s=1+2+3+4+…… 當結果大小等于55時結束

　　Private Sub Form_click()

　　Dim s As Integer, n As Integer

　　s = 0

　　n = 0

　　Do While s < 55

　　n = n + 1

　　s = s + n

　　Loop

　　Print s, n

　　End Sub

　　相關推薦：

　　2012年下半年計算機等級考試報名時間及入口匯總

　　計算機等級考試三級PC技術過關心得技巧

　　2012年3月計算機二級考試真題匯總