【正文】 給常量分配名字、值和類型。 常量 聲明常量的語法為： [ Public | Private ] Const 常量名 [ As 數(shù)據(jù)類型 ] = 表達式 說明： ? [ ]表示可以省略的參數(shù)， | 表示可以選擇的參數(shù)。 ? 表達式由數(shù)值常量、字符串等常量及運算符組成，可以包含前面定義過的常量，但不能使用函數(shù)調(diào)用。 變量 在程序運行過程中，需要用變量來臨時存儲數(shù) 據(jù)，并且變量中存儲的這些數(shù)據(jù)是可以改變的。 一、 聲明變量 聲明變量即通知程序以后在程序中可以使用此變 量。 167。 圖 “ 工具”菜單的“選項對話框” 167。按作用域不同，可分為局部變量和全局變量。 聲明此類變量的格式如下： Dim 變量名 [ As 數(shù)據(jù)類型名 ] 167。但是與普通局部變量的差別在于：靜態(tài)局部 變量在整個程序運行期間均有效，并且過程執(zhí)行結(jié)束后，只要程 序還沒有結(jié)束，該變量的值就仍然存在，該變量占有的空間不被 釋放。一般在聲明此類變量時，使用如下格式： Private 變量名 [As 數(shù)據(jù)類型名 ] 167。一般在聲明此類變量時，使用如下格式： Public 變量名 [As 數(shù)據(jù)類型名 ] 表 不同作用范 圍 的 3種變 量 聲 明方式 作用范 圍 局部 變 量 模 塊級變 量 全局 變 量 聲 明方式 變 量的 聲 明位置 能否被本模 塊 中其他 過 程 訪問 能否被其他模 塊訪問 Dim,Static 過 程之中 否 否 Dim,Private 模 塊 的 聲 明段中 能 否 Public 模 塊 的 聲 明段中 能 能 167。一 個普通的常量、變量均屬于簡單的表達式。 運算符 VisualBasic中的運算符包括賦值運算符、數(shù)學運算符、位運算符、關系運算符和邏輯運算符?！爸怠? 可以是常量、變量、表達式或函數(shù)返回值。 167。 連 接字符串 運 算符 167。其優(yōu)先 級低于數(shù)學運算符，各個關系運算符的優(yōu)先級是相同 的，結(jié)合順序從左到右。表 3. 6列出了 VisualBasic中主要的關系運算符。 運算符 表 關系運算符運算符 說明 大于 小于= 大于或等于= 小于或等于= 等于 不等于L ik e 字符串模式匹配運算符Is 對象一致比較運算符167。 用來進行連 接運算的運算符有兩個 “ amp。 “ amp。 167。 Visual Basic中的邏輯運算符如表 。 運算符 六、 日期運算符 日期型數(shù)據(jù)是一種特殊的數(shù)值型數(shù)據(jù)，日期型數(shù)據(jù)之間可以進行加“ +” 和減“ ” 運算。例 :10/17/2022 10/1/2022，結(jié)果為 16。 例如： 11/1/2022 +16，結(jié)果為 11/17/2022。 例如： 11/27/2022 10，結(jié)果為 11/17/2022。 運算符 七、運算符的優(yōu)先順序 所有關系運算符的優(yōu)先順序都相同，而算術運算符號和邏輯運算符則必須按照下列優(yōu)先順序進行處理： 指數(shù)運算（ ^） 負號（ ） 乘法和除法（ *、 /） 整數(shù)除法（ \） 求模運算（ Mod） 加法和減法（ +、 ） 字符串連接（ amp。 數(shù)組 一、數(shù)組的概念 數(shù)組是具有相同的內(nèi)部數(shù)據(jù)類型的順序索引元素的 集合，數(shù)組中的每個元素都具有唯一的索引標識號。當數(shù) 據(jù)類型為 Variant 時，各個元素能夠包含不同類型的 數(shù)據(jù)（對象、字符串、數(shù)值等）。 167。 (2)建立模塊級數(shù)組，在模塊的聲明段用 Private或 Dim 語句聲明數(shù)組。 167。 (2)維數(shù)定義：可選的。 “維數(shù)定義”參數(shù)使用下面的語法： [下界 1 To ] 上界 1 [， [下界 2 To ] 上界 2] . . . 如果不顯式指定“下界”，則數(shù)組的下界由 Option Base 語句控制。 ?數(shù)據(jù)類型：可選的，數(shù)組中各元素的類型。 數(shù)組 聲明數(shù)組時，在數(shù)組名之后跟一個用括號括起來的上界。例如，下列數(shù)組聲明可出現(xiàn)在模塊的聲明段： Dim Counters（ 14） As Integer ‘15 個元素。 為建立全局數(shù)組，直接用 Public 取代 Dim。 數(shù)組 4．多維數(shù)組 可用 Visual Basic 聲明多維數(shù)組。 Static MatrixA（ 9, 9） As Double 可用顯式下界來聲明兩個維數(shù)或兩個維數(shù)中的任何一個： Static MatrixA（ 1 To 10, 1 To 10） As Double 可以將所有這些推廣到二維以上的數(shù)組。元素總 數(shù)為三個維數(shù)的乘積 600。 數(shù)組 數(shù)組的使用 在建立（聲明）一個數(shù)組之后，就可以使用數(shù)組。 (2)引用數(shù)組元素的方法是在數(shù)組名后的括號中指定下標如： t=A（ 5） :s=B（ 3,4） (3)引用數(shù)組元素時，數(shù)組名、數(shù)組類型和維數(shù)必須與數(shù)組聲明時一致。 (5)在同一過程中，數(shù)組與簡單變量不能同名。 數(shù)組 例：隨機產(chǎn)生 10個兩位整數(shù)，找出其中最大值、最小值 和平均值，如圖 。 數(shù)組 設計步驟如下： 。 首先在模塊通用段聲明數(shù)組： Dim a(1 to 10) as integer 隨機整數(shù)的生成由窗體的 Load事件代碼完成： Private Sub Form_Load() Dim p As String : p = : Randomize For i = 1 To 10 a(i) = Int(Rnd * 90) + 10 p = p amp。 , Next i = LTrim(Left(p, Len(p) 1)) End Sub 167。 數(shù)組 “重置”按鈕 Command1的 Click事件代碼： Private Sub Command1_Click() Form_Load = = = End Sub 最后是“關閉”按鈕 Command3的 Click事件代碼： Private Sub Command3_Click() Unload Me End Sub 167。給數(shù)組附以一個空 維數(shù)表，這樣就將數(shù)組聲明為動態(tài)數(shù) 組。 ReDim DA（ X + 1） ReDim 語句只能出現(xiàn)在過程中。 167。 其語法如下： ReDim [Preserve] 數(shù)組名 (維數(shù)定義 ) [As 數(shù)據(jù)類型 ] [,數(shù)組名 (維數(shù)定義 ) [As 數(shù)據(jù)類型 ]] ? 說明一： (1)Preserve：可選的關鍵字，當改變原有數(shù)組最末維的大小時，使用此 關鍵字可以保持數(shù)組中原來的數(shù)據(jù)。遵循標準的變量命名約定。最多可以定義 60維的多維數(shù)組。 (4)數(shù)據(jù)類型：可選的。 167。 (2)可以使用 ReDim 語句反復地改變數(shù)組的元素以及維數(shù)的數(shù) 目，但是不能在將一個數(shù)組定義為某種數(shù)據(jù)類型之后，再使用 ReDim 將該數(shù)組改為其它數(shù)據(jù)類型，除非是 Variant 所包含的 數(shù)組。 數(shù)組 例：定義一個動態(tài)數(shù)組，并修改數(shù)組的元素數(shù)目和維數(shù)： Dim x() As String Dim i As Integer, j As Integer ReDim x(3) For i = 0 To 3 x(i) = i amp。 i Next ReDim x(1 To 9, 3) For i = 1 To 9 For j = 0 To 3 x(i, j) = i amp。 數(shù)組 3．保留動態(tài)數(shù)組的內(nèi)容 每次執(zhí)行 ReDim 語句時，當前存儲在數(shù)組中的值都會全部 丟失。 對于多維數(shù)組，在用 Preserve關鍵字時，只能改變數(shù)組中最 后一維的上界。 i amp。 4 amp。 數(shù)組 四、控件數(shù)組 如果在應用程序中用到一些類型相同且功能類似的控件，則 可將這些相同的控件視為一個“控件數(shù)組”。 (3將控件的 Index 屬性設置為非 Null 數(shù)值。 數(shù)組 。 步驟 3：在為數(shù)組中的其它控件輸入相同名稱時， VB將顯示 一個對話框，要求確認是否要創(chuàng)建控件數(shù)組。 圖 確認創(chuàng)建控件數(shù)組 167。 步驟 2：當控件獲得焦點時，選擇“編輯”菜單中的“復 制”命令，或按“ Ctrl+C” 組合鍵。 VB將顯示一個對話框詢問是否確認創(chuàng)建控件數(shù) 組。 步驟 4：重復步驟 3，可得到控件數(shù)組中的其他控件元素。 數(shù)組 直接指定控件數(shù)組中第一個控件的索引值為 0，然后利用前 兩種方法中的任何一種添加控件數(shù)組的成員，將不會出現(xiàn)對話框 詢問是否創(chuàng)建控件數(shù)組。 步驟 2：將其索引值改為 0。 167。 一、順序結(jié)構(gòu) 順序結(jié)構(gòu)就是按照語句的順序一條一條地執(zhí)行。 例如，下面兩個語句的作用是不同的： a = b 39。 將 a的值賦給 b 167。 Print方法的格式和功能與早 期 Basic語言中的 Print語句類似。如果省略“對象表達式”，則在 當前窗體上輸出。在 Form1窗體中顯示 Basic! 167。當各表 達式用逗號作為分隔符時，按打印區(qū)顯示數(shù)據(jù)項，每隔 14列開始 一個打印區(qū)，每列的寬度是所選字體磅值大小的所有字符的平均 寬度。 為了使數(shù)據(jù)按指定的位置輸出， VB提供了幾個與 Print配合使用 的函數(shù)。 其中， n為數(shù)值表達式，其值為整數(shù)，它是下一個輸出位置的 列號，表示在輸出前把光標或打印頭移到該列。如果當前的顯示位置已經(jīng)超過 n，則自動下移一行。 Tab函數(shù)把顯示或打印位置移到由參數(shù) n指定的列數(shù)，從此列 開始輸出數(shù)據(jù)。例如： Print Tab(10)。Tab(30)。 （ 2） Spc函數(shù) 在 Print方法或 Print語句中，用 Spc函數(shù)跳過 n個空格。 Spc函數(shù)與輸出項間用分號隔開。Spc(5)。輸出： ABC DFE 當 Print方法與不同大小的字體一起使用時，使用 Spc函數(shù)打 印的空格字符的寬度總是等于選用字體內(nèi)以磅數(shù)為單位的所有字 符的平均寬度。 例：設計一個窗體說明 Print方法的使用。s study VisualBasic amp。s study amp。 7 * 10 Print FontSize = 20 39。顯示當前日期和時間 Print FontSize = 20 39。 10 * 7 FontSize = 12 Print 10*7=, 10 * 7 167。設置字體為黑體 Print 歡迎使用 。 二、選擇結(jié)構(gòu) 所謂選擇結(jié)構(gòu)，可以根據(jù)不同的情況做出不同的選擇，執(zhí)行 不同的操作。 1. If?Then? 結(jié)構(gòu) 使用 If?Then? 結(jié)構(gòu)可以有條件地執(zhí)行某些語句，它有兩種 語法形式： (1)只選擇執(zhí)行一條語句。 (2)需要執(zhí)行多條語句。 ?Then?Else? 結(jié)構(gòu) 使用 If?Then?Else 結(jié)構(gòu)可以從兩個程序流程分支中選擇一個分支執(zhí)行。 當執(zhí)行到 If?Then?Else? 結(jié)構(gòu)時， VisualBasic會首先測 試條件 1。當它找到一個為 True的條件 時， VisualBasic就會執(zhí)行相應的語句序列，然后執(zhí)行 End If語 句后面的代碼。 例如：編寫程序，隨著用戶不斷單擊窗體，更改窗體的標題： Private sub Form_Click() static Index as Integer Index = Index + 1 If Index = 1 Then = “ 床前明月光” ElseIf Index = 2 Then = “ 疑是地上霜” ElseIf Index = 3 Then