【正文】 th=100% bordercolor=blue border=1 TR height=25 bgcolor=blue TD align=centerfont color=white程序輸出結(jié)果/font/TD/TR TR bgcolor=whiteTD % Dim s As TestMethod 39。 動手做： %page LANGUAGE = vb AutoEventWireup=false% script language=vb runat =server class TestMethod Function square(ByVal x As Integer) As Integer return x * x End Function Function square(ByVal x As Double) As Double return x * x End Function Function square(ByVal x As Decimal) As Decimal return x * x End Function End Class [例 45]()使用方法重載 /script HTML HEAD titleTest Property/title /HEAD BODY TABLE width=100% bordercolor=blue border=1 TR height=25 bgcolor=blue TD align=centerfont color=white程序輸出結(jié)果/font/TD/TR TR bgcolor=whiteTD % Dim t As new TestMethod() (The squre is amp。新類從既有類中繼承類成員，同時為了賦予新類以新的特性，可以重新定義或加進新的成員，從而形成類的層次或等級。 如 [例 46]在創(chuàng)建派生類 Director實例時，使用MyBase調(diào)用其基類 Employee的構(gòu)造函數(shù)。默認情況下， Public 方法為 NotOverridable。下面就詳細說明。 委托聲明 Class MyTime Public mTime As String public Sub HelloTime(ByVal s As String) mTime = s amp。在 中，使用委托作為這個紐帶。 ! The time is amp。 通過 OnClick=Button_OnClick，把 OnClick事件與事件處理程序Button_OnClick聯(lián)系起來 asp:Button id=Submit Text=Yes OnClick=Button_OnClick RunAt=Server/ /TD /TR /TABLE /Form /BODY /HTML 程序輸出結(jié)果如圖 47所示： 當單擊按鈕后，程序輸出如圖 48所示： 名稱空間 .NET Framework提供了非常多的類，為了更好地組織這些類，提出了名稱空間的概念，它把功能相似或相同的類組織在一起。定義名稱空間的語法為： Namespace 名稱空間名 End Namespace 習題： 1. 比較以下程序： （ 1） Class Test Private age As Integer Public Function GetAge() As Integer Return age。 8. 給出下列程序的運行結(jié)果 Class a Private result As Double Public Sub Add(ByVal a As Double,ByVal b As Double) result = a + b End Sub Public Sub Add(ByVal x As Double , ByVal y As Double, ByVal z As Double) result = x + y + z End Sub Public Function GetResult() As Double Return result End Function End Class Dim test As New a() (10, 20 , 30) (“The result is “ amp。其中，教師信息包括教師編號、教師姓名、工資和所屬教研室；學生信息包括學號、學生姓名、所屬班級和總成績。 ices 包含創(chuàng)建 XML Web服務的類 提供創(chuàng)建以 Web 頁上的用戶界面形式出現(xiàn)在 Web 應用程序中的控件和頁的類和接口 提供基于標準的 XML 處理支持 只有先聲明名稱空間，才能在程序中使用名稱空間中的類和對象。 BR) ? AddHandler , AddressOf ? (Hello) ? () ? % ? /TD ? /TR ? /TABLE ? /BODY ? /HTML 程序的輸出如圖 46所示： 點評： 程序的第 7行聲明一個事件 TimeEventHandler，其具體格式為： Dim 修飾符 event 事件名 As 委托類型 程序在 MyTime類中聲明了一個事件TimeEventHandler，在 ProcessTime類中聲明了事件處理程序 GenerateTime，在 TestTime類中使用事件。 委托聲明 Class MyTime public event Timer(ByVal s As string) 39。引發(fā)（觸發(fā)）事件的對象叫做事件發(fā)送方。并使用 AddressOf向委托傳遞方法的地址。與其他的類不同，委托類具有一個簽名，并且它只能對與其簽名匹配的方法進行引用。如果繼承的屬性或方法需要在派生類中有不同的行為，則可以在派生類中重新定義該方法。但不能得到在父類中聲明為 Private（私有）的方法、屬性和字段。 , amp。 直接用類名調(diào)用共享方法 (The Value of Shared field is amp。共享方法不能用 Overridable、 NotOverridable 或 MustOverride 修飾符聲明。它與普通的過程和函數(shù)語法格式基本是一樣的。另外，例子中還聲明了一個只讀屬性 height，它只有 Get屬性過程，并且使用 ReadOnly修飾符修飾屬性。 動手做： %page LANGUAGE = vb% script language=vb runat =server Class Window Private pWidth As Double = 30 Private pHeight As Double = 20 Public Property width() As Double Get Return pWidth End Get Se