【正文】 格式字符串： 0 實(shí)際數(shù)字小于符號(hào)位數(shù)，數(shù)字前后加 0 ＃實(shí)際數(shù)字小于符號(hào)位數(shù)，數(shù)字前后不加 0 a=“” Format(a,””) Format(a,””) Format(a,”.”) Format(a,”.”) 用戶交互函數(shù)和過程 1. InputBox函數(shù) 變量名 =InputBox[$](提示信息 [， 標(biāo)題 ][， 缺省 ][， x坐標(biāo) ][， y坐標(biāo) ] ) 其中 :提示 提示信息 ,標(biāo)題 標(biāo)題區(qū)顯示 ,缺省 輸入?yún)^(qū)缺省值 例如，要在屏幕上顯示如下的對(duì)話框 : 缺省值 標(biāo)題題 提示 例如：有下列語句如下 : Dim strName As String * 40， strS1 As String * 40 strS1 = “請(qǐng)輸入你的姓名然后單擊確定” strName= InputBox$(strS1， “輸入框”， ， 100，100) 當(dāng)鍵盤輸入“王曉明” 后 ,變量 strName獲得鍵盤輸入的值 . 2. MsgBox函數(shù)和 MsgBox過程 函數(shù)形式 :變量 [%] = MsgBox(提示 [,按鈕 [＋圖標(biāo) ]+ [缺省按鈕 ]+[模式 ]][，標(biāo)題 ]) 過程形式 : MsgBox 提示 [,按鈕 [＋圖標(biāo) ] +[缺省按鈕 ]+ [模式 ]][,標(biāo)題 ] 圖標(biāo) 標(biāo)題 提示信息 命令按鈕 說明： １ “標(biāo)題”和“提示”與 InputBox函數(shù)中對(duì)應(yīng)的參數(shù)相同； ２ “按鈕＋圖標(biāo) +缺省按鈕 +模式”是整型表達(dá)式，決定信息框按鈕數(shù)目、出現(xiàn)在信息框上的圖標(biāo)類型及操作模式 (見表 ) ３ 若程序中需要返回值，則使用函數(shù)，否則可調(diào)用過程。 VB編碼規(guī)則 1． VB代碼中不區(qū)分字母的大小寫。 2．在同一行上可以書寫多條語句，但語句間要用冒號(hào)“ :”分隔。 3．若一個(gè)語句行不能寫下全部語句，或在特別需要時(shí)，可以換行。換行時(shí)需在本行后加入續(xù)行符， 1個(gè)空格加下劃線“ _”。 4．一行最多允許 255個(gè)字符。 5．注釋以 Rem開頭，也可以使用單引號(hào)“ 39。”，注釋內(nèi)容可直接出現(xiàn)在語句的后面。 6．在程序轉(zhuǎn)向時(shí)需用到標(biāo)號(hào)，標(biāo)號(hào)是以字母開始而以冒號(hào)結(jié)束的字符串。 選擇結(jié)構(gòu) 1. If…Then 語句 (單分支結(jié)構(gòu) ) If 表達(dá)式 Then 語句塊 End If 或 If 表達(dá)式 Then 語句 例 :已知兩個(gè)數(shù) x和 y，比較它們的大小， 使得 x大于 y. If xy Then t=x : x=y: y=t End If 或 If xy Then t=x: x=y: y=t 2. If…Then…Else 語句(雙分支結(jié)構(gòu) ) If 表達(dá)式 Then 語句塊 1 Else 語句塊 2 End If 例如：輸出 x,y兩個(gè)中值較大的一個(gè)值。 IF XY Then Print X Else Print Y End If 也可以寫成如下的單行形式： IF XY Then Print X Else Print Y 3. If…Then…ElseIf 語句 (多分支結(jié)構(gòu) ) 形式 : If 表達(dá)式 1 Then 語句塊 1 ElseIf 表達(dá)式 2Then 語句塊 2 … [Else 語句塊 n+1 ] End If 例：輸入一學(xué)生成績(jī)， 評(píng)定其等級(jí)。方法是： 90~100分為“優(yōu)秀”， 80~89分為“良好”， 70~79分為“中等”， 60~69分為“及格”， 60分以為“不合格” 使用 IF語句實(shí)現(xiàn)的程序段如下： If x=90 then Print 優(yōu)秀 ElseIf x=80 Then Print 良好 ElseIf x=70 Then Print 中等 ElseIf x=60 Then Print 及格 Else Print 不及格 End If Select Case語句（情況語句） 形式： Select Case 變量或表達(dá)式 Case 表達(dá)式列表 1 語句塊 1 Case 表達(dá)式列表 2 語句塊 2 … [Case Else 語句塊 n+1] End Select 數(shù)值型或字符串表達(dá)式 表達(dá)式列表 ：與 變量或表達(dá)式 同類型的下面四種形式之一： 表達(dá)式 例 : A +5 一組枚舉表達(dá)式 (用逗號(hào)分隔 ) 2, 4, 6, 8 表達(dá)式 1 To 表達(dá)式 2 60 to 100 Is 關(guān)系運(yùn)算符表達(dá)式 Is 60 循環(huán)結(jié)構(gòu) 1. For循環(huán)語句 (一般用于循環(huán)次數(shù)已知 ) 形式 For 循環(huán)變量＝初值 to 終值 [Step 步長(zhǎng) ] 語句塊 [Exit For] 語句塊 Next 循環(huán)變量 0 初值 終值 =1 時(shí) ,可省略 0 初值 終值 =0 死循環(huán) 步長(zhǎng) 循環(huán)次數(shù) )1( ?? ?步長(zhǎng) 初值終值In t例 : For I=2 To 13 Step 3 Print I , Next I Print “I=“, I 循環(huán)執(zhí)行次數(shù) 輸出 I的值分別為 : 2 5 8 11 出了循環(huán)輸出為 : I=14 4)1( 3 213 ??? ?I n t例 編程計(jì)算： =1+2+3+…+100 Dim S%, I% S=0 39。 累加前變量 S為 0 For I=1 to 100 S=S+I Next I Print S=,S Do…Loop 循環(huán)語句 形式 1：（當(dāng)型循環(huán)） Do { While|Until }條件 語句塊 [Exit Do] 語句塊 Loop 形式 2： (直到循環(huán)） Do 語句塊 [Exit Do] 語句塊 Loop { While|Until} 條件 說明： （ 1）當(dāng)使用 While條件 構(gòu)成循環(huán)時(shí)，當(dāng)條件為“真”，則反復(fù)執(zhí)行循環(huán)體，當(dāng)條件為“假”，則退出循環(huán)。 （ 2） 當(dāng)使用 Until 條件 構(gòu)成循環(huán)時(shí) ， 當(dāng)條件為 “ 假 ” ， 則反復(fù)執(zhí)行循環(huán)體 ， 直到條件成立 ， 即為 “ 真 ” 時(shí) ， 則退出循環(huán) 。 （ 3）在循環(huán)體內(nèi)一般應(yīng)有一個(gè)專門用來改變條件表達(dá)式中變量的語句，以使隨著循環(huán)的執(zhí)行，條件趨于不成立（或成立），最后達(dá)到退出循環(huán)。 （ 4）語句 Exit Do的作用是退出它所在的循環(huán)結(jié)構(gòu)，它只能用在DO/Loop結(jié)構(gòu)中，并且常常是同選擇結(jié)構(gòu)一起出現(xiàn)在循環(huán)結(jié)構(gòu)中，用來實(shí)現(xiàn)當(dāng)滿足某一條件時(shí)提前退出循環(huán)。 While…Wend 語句 使用格式如下： While 條件 循環(huán)塊 Wend 說明： 該語句的功能與 Do While 條件 ….Loop 實(shí)現(xiàn)的循環(huán)完全相同。 循環(huán)的嵌套 ——多重循環(huán)結(jié)構(gòu) 如果在一個(gè)循環(huán)內(nèi)完整地包含另一個(gè)循環(huán)結(jié)構(gòu)，則稱為多重循環(huán)， 或循環(huán)嵌套，嵌套的層數(shù)可以根據(jù)需要而定，嵌套一層稱為二重 循環(huán)，嵌套二層稱為三重循環(huán)。 對(duì)于循環(huán)的嵌套，要注意以下事項(xiàng)： (1) 內(nèi)循環(huán)變量與外循環(huán)變量不能同名； (2) 外循環(huán)必須完全包含內(nèi)循環(huán)，不能交叉； (3) 不能從循環(huán)體外轉(zhuǎn)向循環(huán)體內(nèi)，也不能從外循環(huán)轉(zhuǎn)向內(nèi)循環(huán)