Megjegyzés
Az oldalhoz való hozzáféréshez engedély szükséges. Megpróbálhat bejelentkezni vagy módosítani a címtárat.
Az oldalhoz való hozzáféréshez engedély szükséges. Megpróbálhatja módosítani a címtárat.
Az Inherits utasítás egy új, származtatott osztálynak nevezett osztály deklarálásához használható egy meglévő osztály alapján, amelyet alaposztálynak nevezünk. A származtatott osztályok öröklik és bővíthetik az alaposztályban definiált tulajdonságokat, metódusokat, eseményeket, mezőket és állandókat. A következő szakasz az öröklés néhány szabályát, valamint azokat a módosítókat ismerteti, amelyekkel megváltoztathatja az osztályok öröklési módját vagy azt, hogyan öröklődnek.
Alapértelmezés szerint minden osztály örökölhető, kivéve, ha a
NotInheritablekulcsszóval van megjelölve. Az osztályok örökölhetnek más osztályoktól a projektben, vagy a projekt által hivatkozott más könyvtárak osztályaitól.A több öröklést lehetővé tevő nyelvektől eltérően a Visual Basic csak egyetlen öröklést engedélyez az osztályokban; vagyis a származtatott osztályoknak csak egy alaposztályuk lehet. Bár az osztályokban több öröklés nem engedélyezett, az osztályok több interfészt is implementálhatnak, amelyek hatékonyan érik el ugyanazt a célt.
A korlátozott elemek alaposztályban való felfedésének megakadályozása érdekében a származtatott osztály hozzáférési típusának meg kell egyenlõnek vagy szigorúbbnak kell lennie, mint az alaposztálya. Egy
Publicosztály például nem örökölhet egyFriendvagy egyPrivateosztályt, és egyFriendosztály nem örökölhet egyPrivateosztályt.
Öröklési módosítók
A Visual Basic az alábbi osztályszintű utasításokat és módosítókat mutatja be az öröklés támogatásához:
Inheritsutasítás – Az alaposztályt adja meg.NotInheritablemódosító – Megakadályozza, hogy a programozók alaposztályként használják az osztályt.MustInheritmódosító – Azt határozza meg, hogy az osztály csak alaposztályként használható. Az osztályok példányaiMustInheritnem hozhatók létre közvetlenül, csak származtatott osztály alaposztálypéldányaként hozhatók létre. (Más programozási nyelvek, például a C++ és a C# az absztrakt osztály kifejezést használják egy ilyen osztály leírására.)
Tulajdonságok és metódusok felülírása származtatott osztályokban
A származtatott osztály alapértelmezés szerint az alaposztályától örökli a tulajdonságokat és a metódusokat. Ha egy örökölt tulajdonságnak vagy metódusnak másképp kell viselkednie a származtatott osztályban, felülírhatjuk
Overridable— Lehetővé teszi, hogy egy osztály egy tulajdonsága vagy metódusa felül legyen bírálva egy származtatott osztályban.Overrides— Felülbírálja az alaposztályban definiáltOverridabletulajdonságot vagy metódust.NotOverridable— Megakadályozza, hogy egy tulajdonság vagy metódus felülíródjon egy öröklő osztályban. Alapértelmezés szerint aPublicmetódusok a következőkNotOverridable: .MustOverride— Megköveteli, hogy egy származtatott osztály felülbírálja a tulajdonságot vagy metódust.MustOverrideA kulcsszó használatakor a metódusdefiníció csak az ,SubvagyFunctionutasításbólPropertyáll. Más utasítás nem engedélyezett, és konkrétan nincsEnd SubvagyEnd Functionutasítás.MustOverridemetódusokat osztálybanMustInheritkell deklarálni.
Tegyük fel, hogy osztályokat szeretne definiálni a bérszámfejtés kezeléséhez. Meghatározhat egy általános Payroll osztályt, amely egy olyan metódust RunPayroll tartalmaz, amely egy átlagos hét bérszámfejtési adatait számítja ki. Ezután Payroll használhatja alaposztályként egy specializáltabb BonusPayroll osztályhoz, amely felhasználható az alkalmazottak bónuszainak elosztásakor.
Az BonusPayroll osztály örökölheti és felülbírálhatja az PayEmployee alaposztályban Payroll definiált metódust.
Az alábbi példa egy alaposztályt Payrollés egy származtatott osztályt határoz meg, BonusPayrollamely felülír egy örökölt metódust PayEmployee. Egy eljárás, RunPayrollamely létrehozza és átadja egy Payroll objektumot és egy BonusPayroll objektumot egy függvénynek, Payamely mindkét objektum metódusát végrehajtja PayEmployee .
Const BonusRate As Decimal = 1.45D
Const PayRate As Decimal = 14.75D
Class Payroll
Overridable Function PayEmployee(
ByVal HoursWorked As Decimal,
ByVal PayRate As Decimal) As Decimal
PayEmployee = HoursWorked * PayRate
End Function
End Class
Class BonusPayroll
Inherits Payroll
Overrides Function PayEmployee(
ByVal HoursWorked As Decimal,
ByVal PayRate As Decimal) As Decimal
' The following code calls the original method in the base
' class, and then modifies the returned value.
PayEmployee = MyBase.PayEmployee(HoursWorked, PayRate) * BonusRate
End Function
End Class
Sub RunPayroll()
Dim PayrollItem As Payroll = New Payroll
Dim BonusPayrollItem As New BonusPayroll
Dim HoursWorked As Decimal = 40
MsgBox("Normal pay is: " &
PayrollItem.PayEmployee(HoursWorked, PayRate))
MsgBox("Pay with bonus is: " &
BonusPayrollItem.PayEmployee(HoursWorked, PayRate))
End Sub
A MyBase kulcsszó
A MyBase kulcsszó úgy viselkedik, mint egy objektumváltozó, amely az osztály aktuális példányának alaposztályára hivatkozik.
MyBase gyakran használják olyan alaposztálytagok elérésére, amelyeket egy származtatott osztályban felülírnak vagy elrejtenek. Az MyBase.New kifejezetten arra szolgál, hogy egy származtatott osztálykonstruktorból meghívjunk egy alaposztály-konstruktort.
Tegyük fel például, hogy olyan származtatott osztályt tervez, amely felülbírálja az alaposztálytól örökölt metódust. A felülírt metódus meghívhatja a metódust az alaposztályban, és módosíthatja a visszatérési értéket az alábbi kódtöredékben látható módon:
Class DerivedClass
Inherits BaseClass
Public Overrides Function CalculateShipping(
ByVal Dist As Double,
ByVal Rate As Double) As Double
' Call the method in the base class and modify the return value.
Return MyBase.CalculateShipping(Dist, Rate) * 2
End Function
End Class
Az alábbi lista a következő MyBasekorlátozások használatát ismerteti:
MyBaseaz azonnali alaposztályra és annak örökölt tagjaira vonatkozik. Nem használható az osztálytagok elérésérePrivate.MyBaseegy kulcsszó, nem valódi objektum.MyBasenem rendelhető hozzá változóhoz, nem adható át eljárásoknak, és nem használható összehasonlításbanIs.A minősítő metódust
MyBasenem kell az azonnali alaposztályban definiálni, hanem közvetetten öröklődő alaposztályban lehet definiálni. Ahhoz, hogy egyMyBaseáltal minősített hivatkozás helyesen kompilálódjon, valamely alaposztálynak tartalmaznia kell egy metódust, amely megfelel a hívásban megjelenő névnek és paramétertípusoknak.Nem használhatja a
MyBaseaMustOverridealaposztály metódusainak hívására.MyBasenem használható önmaga minősítésére. Ezért a következő kód érvénytelen:MyBase.MyBase.BtnOK_Click()MyBasemodulban nem használható.MyBaseNem használható olyan alaposztálytagok elérésére, amelyek úgy vannak megjelölve, minthaFriendaz alaposztály egy másik szerelvényben lenne.
További információ és egy másik példa : Hogyan érhet el rejtett változót származtatott osztály által.
A MyClass kulcsszó
A MyClass kulcsszó úgy viselkedik, mint egy objektumváltozó, amely az eredetileg implementált osztály aktuális példányára hivatkozik.
MyClass hasonlít Me-re, de minden metódus- és tulajdonsághívás MyClass úgy lesz kezelve, mintha a metódus vagy a tulajdonság NotOverridable lenne. Ezért a metódust vagy tulajdonságot nem befolyásolja egy származtatott osztály felülírása.
MyClassegy kulcsszó, nem valódi objektum.MyClassnem rendelhető hozzá változóhoz, nem adható át eljárásoknak, és nem használható összehasonlításbanIs.MyClassaz azt tartalmazó osztályra és annak örökölt tagjaira hivatkozik.MyClasshasználható minősítőként aSharedtagokhoz.MyClassnem használható metódusonSharedbelül, de egy példánymetóduson belül is használható egy osztály megosztott tagjának eléréséhez.MyClassstandard modulokban nem használható.MyClassegy alaposztályban definiált és az adott osztályban megadott metódus implementálásával nem rendelkező metódus minősítésére használható. Az ilyen hivatkozás jelentése megegyezik a metódus jelentésével.MyBase.
Az alábbi példa összehasonlítja a Me és a MyClass.
Class baseClass
Public Overridable Sub testMethod()
MsgBox("Base class string")
End Sub
Public Sub useMe()
' The following call uses the calling class's method, even if
' that method is an override.
Me.testMethod()
End Sub
Public Sub useMyClass()
' The following call uses this instance's method and not any
' override.
MyClass.testMethod()
End Sub
End Class
Class derivedClass : Inherits baseClass
Public Overrides Sub testMethod()
MsgBox("Derived class string")
End Sub
End Class
Class testClasses
Sub startHere()
Dim testObj As derivedClass = New derivedClass()
' The following call displays "Derived class string".
testObj.useMe()
' The following call displays "Base class string".
testObj.useMyClass()
End Sub
End Class
Annak ellenére, hogy derivedClass felülbírálja a testMethod-t, a MyClass kulcsszó useMyClass semlegesíti a felülbírálás hatásait, és a fordító a hívást az alaposztály testMethod verziójára oldja fel.
Lásd még
- Öröklődési utasítás
- Me, My, MyBase és MyClass
- Object-Oriented programozás (Visual Basic)
- Interfészek (Visual Basic)
- Az árnyékolás és a felülírás közötti különbségek
- Általános típusok a Visual Basic
- Kovariancia és kontravariancia (Visual Basic)
- Variancia általános felületeken (Visual Basic)
- Absztrakt osztályterv
- Alaposztályok absztrakciók implementálására