Galileo Computing < openbook > Galileo Computing - Professionelle Bücher. Auch für Einsteiger.
Professionelle Bücher. Auch für Einsteiger.

Inhaltsverzeichnis
1 Einführung
2 Grundlagen
3 Fehlerbehandlung
4 Erweiterte Grundlagen
5 Objektorientierte Programmierung
6 Wichtige Klassen in .NET
7 Weitere Elemente eines Windows-Programms
8 Datenbank-Anwendungen mit ADO.NET
9 Internet-Anwendungen mit ASP.NET
10 Zeichnen mit GDI+
11 Neues in Visual Basic 2008
12 Beispielprojekte
A Installation
B Lösungen der Übungsaufgaben
Stichwort

Download:
- ZIP, ca. 8,4 MB
Buch bestellen
Ihre Meinung?

Spacer
 <<   zurück
Einstieg in Visual Basic 2008 von Thomas Theis
Inkl. zahlreicher Beispiele und Uebungen
Buch: Einstieg in Visual Basic 2008

Einstieg in Visual Basic 2008
geb., mit DVD
442 S., 24,90 Euro
Galileo Computing
ISBN 978-3-8362-1192-5
Online bestellenJetzt online bestellen
* versandkostenfrei in (D) und (A)
Pfeil 5 Objektorientierte Programmierung
  Pfeil 5.1 Was ist Objektorientierung?
  Pfeil 5.2 Klasse, Eigenschaft, Methode, Objekt
    Pfeil 5.2.1 Objektverweis und Instanz
  Pfeil 5.3 Eigenschaftsmethode
  Pfeil 5.4 Konstruktor
  Pfeil 5.5 Referenzen und Werte
    Pfeil 5.5.1 Objekte vergleichen
  Pfeil 5.6 Statische Elemente
  Pfeil 5.7 Delegates
  Pfeil 5.8 Ereignisse
  Pfeil 5.9 Namespaces
  Pfeil 5.10 Vererbung
  Pfeil 5.11 Konstruktoren bei Vererbung
  Pfeil 5.12 Polymorphie
  Pfeil 5.13 Schnittstellen


Galileo Computing - Zum Seitenanfang

5.3 Eigenschaftsmethode  topZur vorigen Überschrift

Kontrolle

Eigenschaftsmethoden (Properties) ermöglichen einen verbesserten Schutz von Klassen-Eigenschaften und eine weitergehende Kontrolle bei den Veränderungen der Eigenschaften. Um dies zu verdeutlichen, wurde die Klasse Fahrzeug im folgenden Programm (p0502) verändert.

Zunächst die neue Klassendefinition:

Public Class Fahrzeug 
   Dim geschwindigkeit As Integer 
 
   Property PGeschwindigkeit() As Integer 
      Get 
         Return geschwindigkeit 
      End Get 
      Private Set(ByVal wert As Integer) 
         If wert > 100 Then 
            geschwindigkeit = 100 
         ElseIf wert < 0 Then 
            geschwindigkeit = 0 
         Else 
            geschwindigkeit = wert 
         End If 
      End Set 
   End Property 
 
   Sub beschleunigen(ByVal wert As Integer) 
      PGeschwindigkeit += wert 
   End Sub 
End Class

Zur Erläuterung:

  • Es gibt nach wie vor die geschützte Eigenschaft geschwindigkeit.

    Property

  • Zu dieser Eigenschaft wurde die Eigenschaftsmethode (Property) PGeschwindigkeit() hinzugefügt.

    Get, Set

  • Eigenschaftsmethoden werden mit dem Schlüsselwort Property eingeleitet und sind zunächst öffentlich. Sie bestehen aus einem Get-Teil und einem Set-Teil. Der Get-Teil ist verantwortlich für die Lesen der Eigenschaft geschwindigkeit. Der Set-Teil ist verantwortlich für das Schreiben in die Eigenschaft geschwindigkeit.
  • Die Teile Get und Set sind öffentlich, wenn die Eigenschaftsmethode öffentlich ist. Sie sind gekapselt, wenn die Eigenschaftsmethode gekapselt ist.
  • Im vorliegenden Programm wurde der Set-Teil der Eigenschaftsmethode mit Private gekapselt. Die Eigenschaft geschwindigkeit soll also nach wie vor nur über die öffentliche Methode beschleunigen() verändert werden können.
  • Im Set-Teil der Eigenschaftsmethode wird durch eine Verzweigung dafür gesorgt, dass der Wert der Eigenschaft geschwindigkeit nicht kleiner als 0 und nicht größer als 100 werden darf (eine Geschwindigkeitsbegrenzung). Eine solche Kontrolle ist einer der Einsatzzwecke einer Eigenschaftsmethode.
  • In der Methode beschleunigen() wird der Wert zu der Eigenschaftsmethode hinzuaddiert. Auf diese Weise wird dafür gesorgt, dass sich auch bei Aufruf der Methode beschleunigen() der Wert der Eigenschaft geschwindigkeit innerhalb der erlaubten Grenzen bewegt.

Es folgt das Programm, in dem die veränderte Klasse benutzt wird:

Public Class frm0502 
   Private Sub cmdAnzeigen_Click( ... ) Handles ... 
      Dim vespa As New Fahrzeug 
      lblAnzeige.Text = vespa.PGeschwindigkeit 
      vespa.beschleunigen(120) 
      ' vespa.PGeschwindigkeit = 100 
      lblAnzeige.Text &= vbCrLf & vespa.PGeschwindigkeit 
   End Sub 
End Class

Abbildung 5.3  Kontrolle durch Eigenschaftsmethode

Zur Erläuterung:

  • Zur Ausgabe wird der öffentlich zugängliche Get-Teil der Eigenschaftsmethode PGeschwindigkeit() benutzt.
  • Es wird »versucht«, das Fahrzeug um 120 zu beschleunigen. Dies gelingt allerdings nicht, da der Set-Teil der Eigenschaftsmethode PGeschwindigkeit() dies verhindert.
  • In der vorletzten Zeile steht (auskommentiert) eine Anweisung, die nicht durchgeführt werden kann. Der Set-Teil der Eigenschaftsmethode PGeschwindigkeit() ist gekapselt, daher führt die Anweisung vespa.PGeschwindigkeit = 100 zu einem Fehler.


Ihr Kommentar

Wie hat Ihnen das <openbook> gefallen? Wir freuen uns immer über Ihre freundlichen und kritischen Rückmeldungen.






 <<   zurück
  Zum Katalog
Zum Katalog: Einstieg in Visual Basic 2008






Einstieg in Visual Basic 2008
bestellen
 Ihre Meinung?
Wie hat Ihnen das <openbook> gefallen?
Ihre Meinung

 Buchtipps
Zum Katalog: Visual Basic 2008






 Visual Basic 2008


Zum Katalog: Einstieg in Visual C++ 2008






 Einstieg in
 Visual C++ 2008


Zum Katalog: Einstieg in Visual C# 2008






 Einstieg in
 Visual C# 2008


Zum Katalog: Visual C# 2008






 Visual C# 2008


Zum Katalog: Visual C# - Video-Training






 Visual C# -
 Video-Training


Zum Katalog: Einstieg in PHP 5 und MySQL 5






 Einstieg in PHP 5
 und MySQL 5


 Shopping
Versandkostenfrei bestellen in Deutschland und Österreich
InfoInfo





Copyright © Galileo Press 2008
Für Ihren privaten Gebrauch dürfen Sie die Online-Version natürlich ausdrucken. Ansonsten unterliegt das <openbook> denselben Bestimmungen, wie die gebundene Ausgabe: Das Werk einschließlich aller seiner Teile ist urheberrechtlich geschützt. Alle Rechte vorbehalten einschließlich der Vervielfältigung, Übersetzung, Mikroverfilmung sowie Einspeicherung und Verarbeitung in elektronischen Systemen.


[Galileo Computing]

Galileo Press, Rheinwerkallee 4, 53227 Bonn, Tel.: 0228.42150.0, Fax 0228.42150.77, info@galileo-press.de