31.01.2013 Aufrufe

Grundlagen der Programmierung mit VBA Visual Basic for

Grundlagen der Programmierung mit VBA Visual Basic for

Grundlagen der Programmierung mit VBA Visual Basic for

MEHR ANZEIGEN
WENIGER ANZEIGEN

Erfolgreiche ePaper selbst erstellen

Machen Sie aus Ihren PDF Publikationen ein blätterbares Flipbook mit unserer einzigartigen Google optimierten e-Paper Software.

Next i<br />

PrintMatrix (MatrixA): PrintMatrix (MatrixB)<br />

End Sub<br />

3.3.6 Datenfel<strong>der</strong> <strong>mit</strong> <strong>der</strong> Array-Funktion<br />

Die Array-Funktion bildet aus den Übergabeparametern ein Array vom Typ Variant. Für kleinere<br />

Fel<strong>der</strong> <strong>mit</strong> unterschiedlichen Datentypen geeignet.<br />

Beispiel.<br />

Sub ArrayFkt()<br />

Dim Mischung As Variant<br />

Mischung = Array(2, "Äpfel", "und", 3, "Birnen")<br />

For i = 0 To UBound(Mischung)<br />

msg = msg & Mischung(i) & " "<br />

Next i<br />

MsgBox msg & " " & Chr(13) & Chr(10) & _<br />

TypeName(Mischung(0)) & " " & _TypeName(Mischung(1))<br />

End Sub<br />

3.3.7 Gültigkeitsbereich und -dauer<br />

Variablen und Konstanten sind nur in ihrem Gültigkeitsbereich bekannt. D.h., in verschiedenen Gültigkeitsbereichen<br />

verweisen Variablen gleichen Namens dennoch auf unterschiedliche Speicherinhalte.<br />

Variablen können gültig sein:<br />

> nur in <strong>der</strong> Prozedur<br />

> im Modul<br />

> im ganzen Projekt<br />

Prozedur. Variable wird in <strong>der</strong> Prozedur vereinbart und dort verwendet.<br />

Sub Beispiel()<br />

Dim BspVar1 As Single<br />

...<br />

End Sub<br />

Modul. Modulvariablen werden vor <strong>der</strong> ersten Prozedur deklariert. Private ist optional.<br />

Dim MdlVar1 As Integer ' Modulvariablen und -<br />

Private MdlVar2 As Long ' konstanten werden vor <strong>der</strong><br />

Const MdlKonstante1 As Double = 3.141 ' ersten Prozedur bzw.<br />

Private Const MdlKonstante2 As Long = 2500 ' Funktion vereinbart.<br />

Sub Beispiel()<br />

Dim BspVar1 As Single ' Prozedurvariable<br />

...<br />

End Sub<br />

Projekt. Projektvariablen werden vor <strong>der</strong> ersten Prozedur deklariert. Dim wird durch Public ersetzt.<br />

Public MdlVar1 As Integer ' Projektvariablen und -<br />

Public Const MdlKonstante1 As Double = 3.141 ' konstanten werden vor <strong>der</strong><br />

Public Const MdlKonstante2 As Long = 2500 ' ersten Prozedur bzw.<br />

' Funktion vereinbart.<br />

Sub Beispiel()<br />

Dim BspVar1 As Single<br />

...<br />

End Sub<br />

Flüchtige und Nichtflüchtige Variablen.<br />

Prozedurvariablen verlieren den zugewiesenen Wert nachdem die Prozedur abgearbeitet wurde. Die<br />

Variable ist flüchtig. Wird die Prozedur ein weiteres Mal aufgerufen, ist nicht sicher, welchen Wert sie<br />

hat. Es hängt von <strong>der</strong> Sprache und vom Kompiler ab, ob sie neu initialisiert ist o<strong>der</strong> irgendwelche zu-<br />

27

Hurra! Ihre Datei wurde hochgeladen und ist bereit für die Veröffentlichung.

Erfolgreich gespeichert!

Leider ist etwas schief gelaufen!