Bien que Visual Basic de Microsoft interdit l'héritage multiple , elle offre encapsulation qui , lorsqu'il est utilisé de façon créative , peut obtenir le même effet . Héritage et encapsulation sont deux bases de la programmation orientée objet, chaque beaucoup plus facile à comprendre par exemple que la définition. Les deux techniques sont les moyens de tirer et d'étendre de nouvelles fonctionnalités à partir de code existant. Dériver une nouvelle classe en héritant alors une encapsulation des classes secondaires . Choses que vous devez
Microsoft Visual Studio ou Visual Basic Express 2010
de connaissances de base de Visual Basic.Net
Afficher plus Instructions
1

Ouvrez Visual Studio et créez une nouvelle application Visual Basic appelé console MultiClassDemo . Cliquez sur " Fichier" puis " Nouveau" et remplir le nouveau formulaire de demande.
2

Créer une nouvelle classe appelée clientèle . Cliquez sur " Project " puis " nouvelle classe " puis entrez clientèle dans le champ Nom . Lorsque la fenêtre de l'éditeur de code s'affiche , modifiez le code comme suit .

Public Class Customer

propriété publique CustomerID As String = ""

publique CompanyName de la propriété As String = "" Photos

publique de la propriété Contact As String = ""

publique Load Overridable Sub (id ByVal As String )

CustomerID = id

CompanyName = " Location Acme "

contact =" Joe Smith "

End Sub End Class

Cette classe décrit un objet à la clientèle avec des propriétés pour ID , nom et coordonnées . La méthode Load attribue des valeurs aux propriétés .
3

Répéter les étapes précédentes pour créer une classe de crédit .

Public Class crédit

publique CustomerID de la propriété As String = ""

publique CreditScore de la propriété As String = ""

publique ReportDate de la propriété As Date = Date.MinValue

charge public Sub ( ByVal id As String )

CustomerID = id

CreditScore = " A + "

ReportDate = # 6/1/2011 #

End Sub End Class

Photos

classe le crédit a ID , pointage de crédit et rapport propriétés de la date ainsi que sa propre méthode Load.
4

créer une troisième classe appelée CustomerCredit et ajoutez l'instruction hérité comme suit . Photos

public Class CustomerCredit

hérite clientèle

Lorsque la classe CustomerCredit se construit par le compilateur , il hérite des propriétés client, société et contact ainsi que la méthode de la charge de la classe Customer .
5

créer un nouveau champ privé appelé note pour encapsuler une instance de la classe de crédit .

note privé As New Credit
6

exposer les propriétés du Credit classe en utilisant les propriétés dérivées.

publique CreditScore de la propriété As String

Obtenir

Retour score.CreditScore

Fin Obtenir
< p > Set ( ByVal valeur As String )

score.CreditScore = valeur

Fin Set

End bien immobilier

publique ReportDate de propriété comme date
< p > Obtenir

Retour score.ReportDate

Fin Obtenir

Set ( ByVal valeur As Date )

score.ReportDate = valeur
< p > Fin Set

End Bien immobilier

Bien que pas aussi pratique que l'héritage multiple , cela ne exposer les propriétés de crédit .
7

remplacer la méthode Load de la clientèle pour charger à la fois les propriétés de crédit client et .

Overrides Sub charge (id ByVal As String )

MyBase.Load (id)

score.Load (id)

End Sub End Class

8

ajouter du code à la fonction principale de Module1 pour tester la nouvelle classe dérivée. Cliquez sur "Windows" puis cliquez sur " Module1.vb " . Mise à jour du code pour lire comme suit :

Module Module1

Sub Main ( )

de cust As New CustomerCredit

cust.Load ( "1234" )

Console.WriteLine ("Client =" & cust.CustomerID )

Console.WriteLine (" Société :" & cust.CompanyName )

Console.WriteLine (" contact: "& cust.Contact )

Console.WriteLine (" Credit Score : "& cust.CreditScore )

Console.WriteLine (" Date du rapport : "& cust.ReportDate.ToShortDateString ) Photos

End Sub End Module

9

Cliquez sur "F5" pour tester le programme .