【正文】 初始化格式如下： Dim 數組名 () As 類型名稱 ={值 1,值 2,… 值 n} 注意 :，所以圓括號中必須為空，根據實際初值的個數確定數組的上界。 EndIf Next n = amp。 For m = 1 To 9 For n = 1 To 9 k = m * n If k = 10 Then = amp。 . End Sub 譯碼算法如下： Code=ASC(Letter)ASC(A)+1 （ 3）循環(huán)嵌套 所謂循環(huán)嵌套就是在一個循環(huán)結構的循環(huán)體內包含另一個或多個循環(huán)結構，也稱為多重循環(huán)。 * amp。 （ 2）條件循環(huán)控制語句 條 件 ?語 句 塊T r u eF a l s eE x i t D o語 句 塊條 件 ?語 句 塊F a l s eT r u eE x i t D o語 句 塊 While…… Loop和 Do Until…… Loop 語句 Do While……Loop Do Until……Loop 語句格式 Do While條件 語句塊 [Exit Do] 語句塊 Loop Do Until條件 語句塊 [Exit Do] 語句塊 Loop 執(zhí)行流程 舉例 （密碼檢驗） PW=InputBox(輸入密碼 ) Do While PWABCD“ PW=InputBox(輸入密碼 ) Loop PW=InputBox(輸入密碼 ) Do Until PW=ABCD“ PW=InputBox(輸入密碼 ) Loop （ 2）條件循環(huán)控制語句 2） Do…… Loop While和 Do…… Loop Until 語句 Do While……Loop Do Until……Loop 語句格式 Do 語句塊 [Exit Do] 語句塊 Loop While條件 Do 語句塊 [Exit Do] 語句塊 Loop Until條件 執(zhí)行流程 舉例 （密碼檢驗） Do PW=InputBox(輸入密碼 ) Loop While PWABCD Do PW=InputBox(輸入密碼 ) Loop Until PW=ABCD 條 件 ?T r u eF a l s e語 句 塊E x i t D o語 句 塊條 件 ?F a l s eT r u e語 句 塊E x i t D o語 句 塊【 例 65】 編寫一個譯碼程序，將一個由大寫字母組成的英語句子譯成數字代碼。 ave) End Sub 【 例 64】 學生分數統(tǒng)計。 vbCrLf amp。 _ ?vbCrLf是回車換行符 最低分 = amp。 smax amp。學生成績累加 If s smax Then smax = s : nummax = num 39。最高分賦值為 1, 最低分賦值為 101 For num = 1 To 10 ch = 請輸入第 amp。 Private Sub Form1_Click(… ) Handles Dim s As Single, num As Integer, smax As Integer, smin As Integer 39。 (3)步長值可以是正數 （ 初值小于終值 ） 或負數 （ 初值大于終值 ） 。 I amp。 【 例 63】 從鍵盤輸入一個字符，判斷它是大寫字母、小寫字母、數字字符還是其他字符。 枚舉常量： Case “q”, “Q” 表達式的值等于 ” q”或 ” Q”。 4） If語句的嵌套 If語句的嵌套是指 If語句中的語句塊又包含 If語句。 x= amp。 x amp。 較大數 amp。 Private Sub Form1_Click(… ) Handles ?限于篇幅，事件框架中的參數省略。 （ 1） If語句 If語句是用來判定所給定的條件是否滿足，根據判斷的結果（ True或 False）來決定執(zhí)行給出的操作之一。若省略此參數，對話框標題為應用程序的名字。 例 : R=InputBox(請輸入你的姓名： , 操作練習 , , 200, 300) 2） MsgBox函數與 MsgBox語句 函數功能：產生一個消息對話框，在對話框中顯示提 示（或警告）信息，同時需要用戶通過選擇按鈕作出如何處理的回答，以決定程序的走向。若省略此參數，則文本框內空白。 ? 函數格式： InputBox (提示信息 [,標題 ][,默認值 ][,Xpos][,Ypos]) 其中： ? 提示信息 :提示信息是必需的字符串，它是在對話框中所顯示的信息。 例 : Const num = 10 Dim I As Integer, K As Integer K = num + I I = 10: K = num + I 注：變量的值為最后一次賦值的結果。 Private Sub Button1_Click( ) Handles Const PI = Dim r, Area As Single r = Val(): Area = r ^ 2 * PI = Str(Area) ?將數值 Area轉換為字符串 End Sub 流程控制結構 3種基本結構：順序結構、分支結構和循環(huán)結構。每一行最多允許255個字符。 Val(a123)=0、 Val(12a3)=1 Val(12e3)=12022 Chr(n) 返回 ASCII代碼值為整數 n的字符 Chr(97)=a Asc(x) 返回字符串 x中第一個字符的 ASCII碼 Asc(ABCD)=65 Fix(x) 將數值型數據 x的小數部分舍去 Fix()=12 Fix()=123 Int(x) 取小于等于 x的最大整數 Int()=12 Int()=124 CBool(x) 將任何有效的字符串或數值轉換成邏輯型 CByte(x) 將 0~255之間的數值轉換為字節(jié)型 CChar(x) 將 x轉換成 Char型 CDate(x) 將有效的日期字符串轉換成日期 CDec(x) 將 x轉換成 Decimal型 CInt(x) 將數值型數據 x的小數部分四舍五入取整 CInt()=12 CInt()=123 CLng(x) 將數值型數據 x轉換成長整型 ， 小數部分四舍五入 CDbl(x) 將數值型數據 x轉換成雙精度型 CObj(x) 將 x轉換成 Object型 CShort(x) 將 x轉換了短整型 CSng(x) 將數值型數據 x轉換成單精度型 CStr(x) 將 x轉換成字符串型 ， 若 x為數值型 ， 則轉為數字字符串 （ 對于正數符號位不予保留 ） CStr(1234)=1234 Cstr()= 表 65轉換 函數 （ 數值與非數值、數制、大小寫字母等 ） 函數名 功 能 示 例 LTrim[$] (x) 去掉 “ x”左邊的空格字符 ， 返回去掉空格后的字符串 LTrim( AB BB )=AB BB RTrim[x] (x) 去掉 “ x”右邊的空格字符 ， 返回去掉空格后的字符串 RTrim( AB BB )=AB BB Trim[$] (x) 去掉 “ x”左右兩邊的空格字符 ， 返回去掉空格后的字符串 Trim( AB BB )=AB BB Mid[$] (x) 截取從 c的 “ Start”位置開始 、 向右的 n個字符 Mid(Visual Basic)=12 Len(c) 統(tǒng)計 “ c”中的字符個數 （ 長度 ） Len(Visual Basic)=12 UCase [$] (c) 將 c 中的小寫字母轉換成大寫字母 ， 返回轉換后的字符串 UCase(Basic)=BASIC LCase [$] (c) 將 c中的大寫字母轉換成小寫字母 ， 返回轉換后的字符串 LCase(Basic)=basic Instr([n],Str1,Str2) 從字符串 Str1的第 n個字符開始查找子串 Str2最先出現的位置 ， 若存在 ， 返回位置值；若不存在 ， 返回 0。 2） Imports語句： 在程序中引入一個名稱空間，這樣在使用該名稱空間內的函數時不用再引用。 一般順序如下： 函數運算 圓括號 （ ） 算術運算 關系運算 邏輯運算 其中： （ 1） 關系運算符優(yōu)先級相同； （ 2） 算術運算符的優(yōu)先級分別為： ① ^ ② （ 負號 ） ③ * / ④ \ ⑤ Mod ⑥ + ⑦ amp。 例如： a+=3 等價于 a=a+3 “+=”稱為 “ 自反加賦值運算符 ” x*=y+8 等價于 x=x*(y+8) “*=”稱為 “ 自反乘賦值運算符 ” m^=2 等價于 m=m^2 “^=”稱為 “ 自反指數賦值運算符 ” ： =（ 自反減賦值運算符 ） /=（ 自反浮點除賦值運算符 ） \=（ 自反整除賦值運算符 ） amp。 符號常量 :用一個標識符來代表一個數值或字符串 。 3） 在同一個有效范圍內 ， 每個常量或變量的名稱必須唯一 。 String類型的缺省規(guī)定為可變長度的字符串，即在對字符串操作時，其長度可增可減。 816 251 426 433 759 354 395 033 5帶 28位小數的數 表 62 其他數據類型 數據類型 類型符 存儲空間 范圍 Boolean（ 邏輯型 ） 2個字節(jié) True或 False Char（ 字符型 ） 2個字節(jié) 一個字符 Date（ 日期型 ） 8個字節(jié) 0001年 1月 1日 0:00:00到 9999年 12月 31日 11:59:59 Object（ 對象型 ） 4個字節(jié) 任何類型數據都可存儲在該類型的變量中 String（ 字符串 ） $ 實際可用內存空間 0到大約 20億個字符 說明： 1） Date類型用于表示日期或時間；常量需要用 括起來 ， 格式為： mm/dd/yyyy， 如： 02/15/2022。、字符型、字符串型、邏輯型、日期型、對象型等。窗體的標題為 “ 用程序設計示例 ” ，在窗體上設置一個文本框顯示 “ 您好，歡迎使用 ”，兩個命令按鈕 【 下一步 】 和【 結束 】 ，單擊 【 下一步 】 按鈕時，文本框中顯示的內容改變?yōu)?“ ，功能強大 ” ，單擊 【 結束 】 按鈕時，程序結束。 Private Sub Button1_Click(ByVal sender As , ByVal e As ) Handles = 打開 = End Sub 創(chuàng)建一個簡單的應用程序實例 ； ； ； 。 （ 3）對象事件 ：由 、能夠被對象設別的動作。 例如： =”打開 ” //設置一個對象名為“ Button1”命令按鈕的 Text屬性為“打開” = //設置“ Button1”命令按鈕的字體顏色為紅色 調用格式如下 : [對象名 ].方法 (參數名表 ) 注：方括號內內容可省略 例如： () //用該方法把光標置于 Text1文本框上。 例如 :命令按鈕 (Button)類 ， 它集中了命令按鈕對象的共有特征 。 在 ，對象是程序設計的基本單元，也是設計時的核心。 控件工具箱 解決方案資源管理器 屬性窗口 設計窗口 雙擊窗體進