【正文】 x(10,20) ? () ? % ? /TD ? /TR ? /TABLE ? /BODY ? /HTML 程序輸出結(jié)果如圖 41所示： ? 點(diǎn)評： 程序中，定義了一個復(fù)數(shù)類 plex。其語法格式為： ? 類修飾符 Class 類名 ? 類體 ? End Class ? 其中，關(guān)鍵字 Class、類名、 End Class和類體是必須項(xiàng)，其他項(xiàng)是可選項(xiàng)。類修飾符見表 41。在類中，聲明了兩個字段 imag和 real，用于表示復(fù)數(shù)的實(shí)部和虛部。 2. 屬性 屬性用于刻畫對象的特征或表示對象的狀態(tài)，它提供對類或?qū)ο笮再|(zhì)的訪問。 對于大多數(shù)屬性來說，都有 Get 和 Set 這兩個屬性過程，可以完成對屬性的讀寫操作。 ) % /TD /TR /TABLE /BODY /HTML 程序輸出如圖 42所示： 點(diǎn)評： 在例子中，聲明了一個屬性 width，它有Get和 Set屬性過程。只需要在類名和方法名中間加上句點(diǎn)即可。這些修飾符以后會逐一加以講解。 共享字段 Shared Sub SharedMethod() 39。方法重載使用 Overloads修飾符。 繼承 –繼承是面向?qū)ο蟪绦蛟O(shè)計(jì)的一個重要特征，它允許在既有類的基礎(chǔ)上創(chuàng)建新類，從而使創(chuàng)建新類的工作變得更加容易。 2. MyBase關(guān)鍵字 MyBase常用于訪問在派生類中被重寫或隱藏的基類成員，它有兩種基本用法： 1. 指定創(chuàng)建派生類實(shí)例時(shí)應(yīng)調(diào)用的基類構(gòu)造函數(shù)，用于調(diào)用基類的構(gòu)造函數(shù)完成對基類成員的初始化工作； 2. 在派生類中訪問基類成員。 NotOverridable — 防止某個屬性或方法在繼承類中被重寫。 使用委托包含幾個步驟：委托聲明；委托實(shí)例化；委托調(diào)用。 動手做： [例 47]()使用委托 % Import Namespace=% %page LANGUAGE = vb% script language=vb runat =server Public Delegate Sub TimeDelegate(ByVal s As String) 39。所需要的是在發(fā)送方和接收方之間用一個紐帶來聯(lián)系。 事件處理 mTime =s amp。 事件處理程序 If =Yes then = = Yes =No Else = = No =Yes End IF End Sub /script HTML HEAD titleTest Class/title /HEAD BODY Form RunAt=Server TABLE width=100% bordercolor=blue border=1 TR height=25 bgcolor=blue TD align=centerfont color=white程序輸出結(jié)果/font/TD/TR TR bgcolor=whiteTD asp:Label id=label1 Text= RunAt=Server/ 39。 在程序中不但可以使用已有的名稱空間，還可以自定義名稱空間，以便把程序按邏輯分組。 7. 設(shè)計(jì)一個隊(duì)列類，要求能夠完成入隊(duì)、出隊(duì)操作（提示：隊(duì)列是在隊(duì)尾加入數(shù)據(jù)元素，即入隊(duì)；在隊(duì)頭刪除數(shù)據(jù)元素，即出隊(duì)的一種數(shù)據(jù)結(jié)構(gòu)）。然后，嘗試引人一個基類，并使用繼承來簡化設(shè)計(jì)。聲明的語法為： % Import Namespace=名稱空間 % 例如： % Import Namespace= % % Import Namespace=% 聲明之后就可以直接使用其中的類和對象了。 對于 ，其事件處理要簡單得多，只需要把事件處理程序綁定到相應(yīng)事件上即可。 聲明事件 public event Timer1 As TimeEventHandler public Sub OnTimer(ByVal s as string) RaiseEvent Timer(s) 39。捕獲事件并對其做出響應(yīng)的對象叫做事件接收方。從而把委托和方法關(guān)聯(lián)起來。這樣，委托就等效于一個類型安全函數(shù)指針或一個回調(diào)，可用于事件處理功能。以下幾個修飾符用于重寫方法： Overridable — 允許某個類中的屬性或方法在派生類中被重寫。有一個例外，就是構(gòu)造函數(shù)，它須在每一個子類中重新編寫。 ()) % /TD /TR /TABLE /BODY /HTML 程序輸出如圖 44所示： 點(diǎn)評： 該類有三個重載方法 square，用于計(jì)算integer、 double和 decimal類型數(shù)的平方。 ) % /TD /TR /TABLE /BODY /HTML 程序輸出如圖 43所示： 3. 方法重載 方法重載允許一個類中有同名的方法存在，即一個類中可以有兩個以上的方法取相同的名字。模塊中聲明的方法是隱式共享的，不能顯式使用 Shared 修飾符。比如，前面講過的構(gòu)造函數(shù)和析構(gòu)函數(shù)就是方法，只不過他們是兩類特殊的方法。 ? 使用 Shared修飾符聲明的字段或?qū)傩允枪蚕碜侄位蚬蚕韺傩浴? amp。 Visual Basic .NET 有兩種類型的屬性過程：Get 屬性過程用于檢索屬性值； Set 屬性過程用于向?qū)傩再x值。原則上，字段應(yīng)該作為類的私有成員，用于封裝類的數(shù)據(jù)。其語法格式為： – Sub Finalize（） – 語句 – End Sub – 當(dāng)銷毀對象時(shí)系統(tǒng)自動調(diào)用 Finalize，該方法主要完成在對象銷毀前需要完成的工作。是生產(chǎn)實(shí)例對象的模板，是對同一類對象的抽象。類體用于定義類的成員，成員可以是變量、屬性、方法和事件。同時(shí)，聲明了兩個不同的構(gòu)造函數(shù)，一個給兩個字段賦初值為 0，一個給兩個字段賦初值為特定值。比如窗口標(biāo)題、窗口位置、客戶名稱等，都可以作為屬性。然而，也可以使用 ReadOnly 或 WriteOnly 修飾符來限制對屬性的讀取或修改，產(chǎn)生只讀和只寫屬性。當(dāng)執(zhí)行語句 = 200 時(shí)，調(diào)用 Set屬性過程給 width屬性賦值。例如： ? Class TestSharedField ? Public Shared ss As Integer ? End Class ? Sub TestShared ? Dim T As TestSharedField 39。 返回值數(shù)據(jù)類型可以是合法的 。 共享方法，為共享字段的值增一 f += 1 End Sub End Class /script HTML HEAD titleTest Property/title /HEAD [例 44]()使用共享方法 BODY TABLE wid