KINN 2010 OOP O Object O Georinteerd P

KINN 2010 • • OOP O Object O Georiënteerd P Programmeren

Object • Alles is een object. • Gebruik maken van een methode • Bijvoorbeeld: • Voetbal. kleur(groen) • Object. methode(parameter)

VB. Net 2008 • Net Framework • 2003 1. 1 • 2005 2. 0 • 2008 3. 5

• Een nieuwe Class • • Bijvoorbeeld persoon Attributen: _naam _leeftijd

De klasse Class Persoon

Attribuut naam • • • Het Object Naam Pieter Leeftijd 45 Met pensioen ? Attribuut leeftijd De methode is gepensioneerd.

We maken een dll van persoon • • Class Persoon attributen _naam _leeftijd • Methode • _isgepensioneerd

Een dll maken. • De Class Persoon • • • _naam _leeftijd _isgepensioneerd Persoon. naam Persoon. leeftijd Persoon. isgepensioneerd

Microsoft VB. Net Express Versie • Gratis te downloaden. • Gratis te gebruiken. • Veel is meegeleverd maar niet alles.

Aan de slag • • Start VB. NET 2008 Kies voor create project Kies voor Class Library Verander de naam Class Library in Persoon

• Verander de File Naam class 1. vb in persoon. vb

GET en SET methoden • • • Klik op de rechtermuisknop Kies insert snippet Kies de tweede optie code patterns Kies de laatste Properties Kies voor define a property

De eigenschap naam definiëren • Verander newpropertyvalue in _naam • Verander New. Property in naam

De eigenschap leeftijd definiëren • Ga met de muis onder end property • Klik op de rechtermuisknop • • Kies insert snippet Kies de tweede optie code patterns Kies de laatste Properties Kies voor define a property

Get en Set methode van leeftijd • Verander newpropertyvalue in _leeftijd • Verander string in integer • Verander New. Property in leeftijd en zorg dat deze ook van het type Integer is

• Ga met de muis onder end property • Klik op de rechtermuisknop • • Kies insert snippet Kies de tweede optie code patterns Kies de laatste Properties Kies voor define a function

Een methode functie isgepensioneerd definieren • Voeg onder Private _naam de volgende regel toe: • Private _pensioen As Boolean

Verander de functie als volgt: • Function Is. Gepensioneerd() As Boolean • If _leeftijd > 66 Then • _pensioen = True • Else • _pensioen = False • End If • Return _pensioen • End Function

• Druk met de rechtermuisknop op Persoon • Bij Application type moet staan Class Library • Bij assembly naam staat persoon • Kies bij het tabblad compile voor een geschikt pad. • Kies tenslotte bovenin op build en build Persoon

• Er zijn nu drie bestanden aangemaakt: • Persoon dll • Persoon pdb • Persoon xml

Persoon dll gebruiken • Kies bij file voor nieuw project • Kies voor een Windows. Application • Sleep twee labels, een knop en 2 textvelden op het scherm

Code onder de eerste knop • Klik eerst op windows application 2 • Kies add reference en zoek persoon. dll op • Kies add existing item en voeg persoon. dll toe door deze op te zoeken

Maak een persoon p aan • Dim p As New Persoon. persoon

Code onder de knop • Dim uitslag As String • p. naam = Text. Box 1. Text • p. leeftijd = Text. Box 2. Text • If p. Is. Gepensioneerd Then • uitslag = " is gepensioneerd" • Else • uitslag = " is niet gepensioneerd" • End If • Msg. Box(p. naam & " " & uitslag))

Test het programma • Run het programma • Vul bij tekstveld 1 Pieter in • Vul bij tekstveld 2 45 in

Test

Een constructor • Begint altijd met New • Wanneer je een waarde mee wilt geven: • • In je klasse PUBLIC Sub NEW(By. Val naam as String) _naam = naam End Sub

• Dan • Dim p as New Persoon(“Piet”)

Voorbeeld constructor • Private Sub Button 1_Click(By. Val sender As System. Object, By. Val e As System. Event. Args) Handles Button 1. Click Dim p As New Persoon. persoon("René") • p. leeftijd = 46 Msg. Box(p. naam & vb. Cr. Lf & p. leeftijd. To. String) • End Sub

Overerving • Public class Docent • Inherits Persoon • Gevolg • Dim d als new Docent • d. naam=“Evert” • d. leeftijd=55