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

Sie wollen auch ein ePaper? Erhöhen Sie die Reichweite Ihrer Titel.

YUMPU macht aus Druck-PDFs automatisch weboptimierte ePaper, die Google liebt.

entwe<strong>der</strong> "verstümmelt" o<strong>der</strong> das Programm bricht <strong>mit</strong> einem Fehler ab. Eine Verstümmelung<br />

entsteht durch Abschneiden <strong>der</strong> zu langen Bit-Folgen beim Speicherübertrag. Das kann zu einer<br />

völlig falschen Interpretation führen und ist nicht <strong>mit</strong> einem Rundungsfehler zu verwechseln.<br />

> Die Verknüpfung unterschiedlicher Datentypen wird am besten vermieden o<strong>der</strong> nur <strong>mit</strong> größter<br />

Vorsicht vorgenommen.<br />

> Sind alle Variablen als Variant definiert, bestimmt <strong>der</strong> Operator den Typ des Ergebnis.<br />

Beispiele.<br />

Sub Zuweisen()<br />

Dim BytErg As Byte, DblErg As Double<br />

Const IntVar As Integer = 132<br />

Const SglVar As Single = 123.45<br />

Dim CrgReturn As String: CrgReturn = Chr(13) & Chr(10)<br />

30<br />

Erg = IntVar + SglVar<br />

DblErg = IntVar + SglVar<br />

BytErg = IntVar + SglVar<br />

MsgBox TypeName(BytErg) & ": " & CStr(BytErg) & CrgReturn & _<br />

TypeName(Erg) & ": " & CStr(Erg) & CrgReturn & _<br />

TypeName(DblErg) & ": " & CStr(DblErg)<br />

BytErg = BytErg + 1 ' Speicherüberlauf! BytErg kann nicht<br />

' größer als 255 werden. Laufzeitfehler.<br />

End Sub<br />

Aufgabe.<br />

Welchen Datentyp und welchen Wert ergibt die Operation 1 & 1 ?<br />

Gegeben sind die beiden Variablen a und b vom Typ Variant:<br />

Dim a As Variant<br />

Dim b As Variant<br />

a = 1<br />

b = 1<br />

Welchen Datentyp und welchen Wert ergeben die Operationen a + b und a & b ?<br />

3.4.3 explizite Typumwandlung<br />

Explizite Typumwandlungen werden <strong>mit</strong> speziellen Funktionen vorgenommen. Nachfolgend eine Übersicht.<br />

Näheres siehe Online-Hilfe.<br />

Syntax. Entsprechend für alle Funktionen.<br />

CStr (Arg)<br />

Parameter Verwendung<br />

Arg Umzuwandeln<strong>der</strong> Ausdruck, Zeichenfolge o<strong>der</strong> numerisch.<br />

Funktion Umwandlung in Bemerkung<br />

Cbool Boolean Eine gültige Zeichenfolge o<strong>der</strong> ein gültiger numerischer Ausdruck.<br />

Cbyte Byte 0 bis 255.<br />

Ccur Currency -922.337.203.685.477,5808 bis 922.337.203.685.477,5807.<br />

CDate Date Ein beliebiger gültiger Datumsausdruck.<br />

CDbl Double -1,79769313486232E308 bis -4,94065645841247E-324<br />

für negative Werte;<br />

4,94065645841247E-324 bis 1,79769313486232E308<br />

für positive Werte.<br />

CDec Decimal +/-79.228.162.514.264.337.593.543.950.335<br />

für skalierte Ganzzahlen, d.h. Zahlen ohne Dezimalstellen.

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

Erfolgreich gespeichert!

Leider ist etwas schief gelaufen!