homelinksBlijf op de hoogte van de recente aanpassingen op vbvoorbeelden!
Visual Basic 2010 Voorbeelden

visual basic 2010 broncode voorbeelden

Microsoft Visual Studio 2010Microsoft Developers Network - Visual BasicMicrosoft .NET Framework

21.2. Interfacing - Message Binding

Print Email Deel op Facebook Deel op Twitter

Dit artikel is gepubliceerd op zondag 31 juli 2011 op vbvoorbeelden, bezoek de website voor een recente versie van dit artikel of andere artikels.

21.2.1. Impliciete Message Binding

In een klasse wordt per concrete implementatie member ( Sub, Function of Property ) de interface, de implementatie en de message binding voor deze member gedefinieerd.

In dit voorbeeld is het onderscheid tussen de interface en implementatie niet erg duidelijk, ze staan samen gedefinieerd :
Visual Basic 2010 Broncode
Namespace Example1
    Class Person
        Private m_Name As String
        Public Function GetName() As String
            GetName = m_Name
        End Function
        Public Sub SetName(ByVal value As String)
            m_Name = value
        End Sub
    End Class
End Namespace
Doordat de implemenatie GetName = m_Name tussen de Function en End Function van de method Public Function GetName() As String staat uitgeschreven, is hier gedefinieerd dat indien deze method wordt aangeroepen, daar voor objecten van het type Person deze implementatie aan wordt gekoppeld.

21.2.2. Expliciete Message Binding

In onderstaand voorbeeld zien we duidelijker het verschil tussen de interface en de implementatie van een member.

Daar wordt de message binding expliciet gedefinieerd aan de hand van de Implements clausule in de methodsignatuur :
Visual Basic 2010 Broncode
Namespace Example2
    Interface IPerson
        Function GetName() As String
        Sub SetName(ByVal value As String)
    End Interface
    Class Person : Implements IPerson
        Private m_Name As String
        Public Function GetName() As String Implements IPerson.GetName
            GetName = m_Name
        End Function
        Public Sub SetName(ByVal value As String) Implements IPerson.SetName
            m_Name = value
        End Sub
    End Class
End Namespace

Dit artikel is gepubliceerd op zondag 31 juli 2011 op vbvoorbeelden, bezoek de website voor een recente versie van dit artikel of andere artikels.