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