【正文】 。掌 握并熟練運(yùn)用 ，通過(guò)本章的學(xué)習(xí)，讀者應(yīng)對(duì)、基本運(yùn)算及表達(dá)式、控制語(yǔ)句以及數(shù)組和基本的對(duì)象編程有清 晰的認(rèn)識(shí)，并且要多做多練，以掌握并能靈活應(yīng)用 。例如： Class Manager Inherits Employee Public Sub PrintBonus() (yearlyBonus) End Sub End Class 上例定義了 Employee類的子類 Manager，該類除了繼承了其父類 Employee的所有成員之外， 還增加一個(gè)方法成員 PrintBonus()。 ， 列于表 。 制作 : 楊玉偉 類和對(duì)象基本概念 Imports System Class Employee Dim salary As Decimal = 40000 Dim yearlyBonus As Decimal = 4000 Public Sub PrintSalary() 39。 制作 : 楊玉偉 類和對(duì)象基本概念 語(yǔ)法： Dim 對(duì)象名 As 類名 對(duì)象名 = New 類名 () 上述語(yǔ)法的功能是創(chuàng)建一個(gè)類對(duì)象，創(chuàng)建一個(gè)對(duì)象的過(guò)程又被稱為實(shí)例化，注意對(duì)象 的初始化必須使用關(guān)鍵字 New。 print the salary to the Console End Sub End Class 2. 對(duì)象 類是創(chuàng)建對(duì)象的模板，對(duì)象是類的實(shí)例。 語(yǔ)法： Class 類名 類成員的聲明 End Class 類的成員包括屬性 (又稱為域 )和方法。 形參數(shù)組對(duì)應(yīng)的實(shí)參數(shù)組必須也是數(shù)組 ， 并且數(shù)據(jù)類型與形參數(shù)組元素類型一致 。 下面的例子給出了帶有可選參數(shù)的過(guò)程的定義： 制作 : 楊玉偉 過(guò)程 Sub ABC(Optional ByVal MyCountry As String=China) …… ?過(guò)程體語(yǔ)句 End Sub 4. 數(shù)組參數(shù) 在定義過(guò)程時(shí)，可用數(shù)組作為參數(shù)。 運(yùn)行界面如左圖所示 ， 點(diǎn)擊 “ 交換 “ 按鈕后的結(jié)果如右圖所示 。 選擇主選單的 “ 生成 ” ?“ 生成解決方案 ” 。 (2) 設(shè)計(jì) 。本例設(shè)計(jì)一個(gè) Swap(X,Y)過(guò)程，將 X和 Y對(duì)應(yīng)的實(shí)參值交換。 制作 : 楊玉偉 過(guò)程 2. 按地址傳遞參數(shù) 用 “ ByRef”關(guān)鍵字指出參數(shù)是按地址來(lái)傳遞的 ,按地址傳遞的效率比較高。 X) End Sub CallInc過(guò)程調(diào)用 Inc函數(shù) ， 將實(shí)參 X的值 (10)傳遞給形參變量 i， 函數(shù) Inc()將 i增 1， 但這個(gè) 改變并不影響實(shí)參變量 X的值 ， 因此 CallInc兩次輸出的 X均為 10。 例如： Function Inc(ByVal i As Integer) i = i+1 End Function Sub CallInc() Dim X As Integer = 10 (X= amp。 語(yǔ)法： [Call] 子程序名 [(參數(shù)表 )] 制作 : 楊玉偉 過(guò)程 2. 調(diào)用函數(shù) 函數(shù)的調(diào)用格式與 Sub子程序相同 ， 即在函數(shù)名之后加上實(shí)在參數(shù)表 。 c) End Sub 制作 : 楊玉偉 過(guò)程 語(yǔ)法： [Private|Public]Function 函數(shù)過(guò)程名 (參數(shù)表 ) [As 數(shù)據(jù)類型 ] 語(yǔ)句塊 函數(shù)名 =返回值 [Exit Function] [語(yǔ)句塊 ] End Function 函數(shù)定義的語(yǔ)法格式與 Sub子程序基本相似 ， 有三點(diǎn)不同： (1) 函數(shù)定義的開(kāi)始和結(jié)束標(biāo)志分別是 Function和 End Function； (2) 函數(shù)定義頭部有 “ As 數(shù)據(jù)類型 ” 部分 ， 用于說(shuō)明函數(shù)返回值的類型； (3) 函數(shù)中需要有返回函數(shù)值的語(yǔ)句 ， 返回函數(shù)值語(yǔ)句有以下兩種形式 1. 函數(shù)名 =表達(dá)式 。 l Exit Sub/Return允許中途強(qiáng)制退出子程序 。 l 子程序名與變量命名規(guī)則相同 。 1. IsArray(varName) 2. LBound(arrName,arrRank) 3. UBound(arrName,arrRank) 制作 : 楊玉偉 過(guò)程 Sub子程序 語(yǔ)法： [Private|Public] Sub 子程序名 (參數(shù)表 ) 語(yǔ)句塊 [Exit Sub | Return] 語(yǔ)句塊 End Sub 其中： l SubEnd Sub是子程序的開(kāi)始和結(jié)束標(biāo)志 。 例如： Dim arr ( ) As Integer Dim i As Integer …… ReDim arr(i) For i=0 To 3 arr(i)=0 Next 注意： （ 1） 靜態(tài)數(shù)組聲明中的下標(biāo)只能是常量 ， 而動(dòng)態(tài)數(shù)組 ReDim語(yǔ)句中的下標(biāo)可以是常量 ， 也可以是有了確定值的變量 。將 5賦給數(shù)組的第一個(gè)元素 i=arr(3) 39。 例如： Dim arr(4) As Integer ＝ {0， 1， 2， 3， 4} 對(duì)數(shù)組中元素的引用格式為：數(shù)組名 (下標(biāo) 1， 下標(biāo) 2， … )。聲明下標(biāo)從 0到 10的一維數(shù)組 ， 共有 11個(gè)元素 Dim arr(5， 4) As String 39。 While 語(yǔ)法： While 條件表達(dá)式 [語(yǔ)句塊 ] [Exit While]