Korrekte Deklarationen, Datentypen, Loop im Array

Korrekte Deklarationen, Datentypen, Loop im Array
Dim x As String, Integer, Long, Single, Double, Currency, LBound, UBound
Deklarationen Folgende verkürzte Befehle sind möglich:
Dim b As Integer Dim b%
Dim b As String Dim b$
Dim b As Long Dim b&
Dim b As Single Dim b!
Dim b As Double Dim b#
Dim b As Currency Dim b@
Unechte Logische Verknüpfung: Echte Logische Verknüpfung:
If x = 5 Then y = (x = 5)
y = True
Else
y = False
End If
Null-Längen-$tring "falsch" ermitteln: Null-Längen-$tring "richtig" ermitteln:
If x$ = "" If Len(x$) = 0
Unechter Logischer Vergleich: Echter Logischer Vergleich:
If x = True Then If x Then
Von Wahr auf Falsch (umständlich) schalten: Von Wahr auf Falsch (schneller) schalten:
If x = True Then x = Not x
x = False
Else
x = True
End If
Loop mit Array falsch (Variable muss jedesmal in der Loop mit Array richtig (Variable wird nur ein mal, also
Schleife neu initialisiert werden) vor dem Loop, initialisiert)
Function Total(arr()) As Long Function Total(arr()) As Long
Dim i% Dim i%, LB As Long, UB As Long
For i = LBound(arr) To UBound(arr) LB = LBound(arr)
Total = Total + arr(i) UB = UBound(arr)
Next i For i = LB To UB
End Function Total = Total + arr(i)
LBound(var) sowie UBound(var) funktionieren nur, Next
wenn die Variable var in einer Function übergeben wird! End Function
Datentyp Double
Sub Pi_Double()
Const Pi = 3.14159 Immer wenn ein Punkt vorhanden ist, wird als Double deklariert
Const C1 = 2 * Pi
Const C2 = Pi / 8 - 0.3
MsgBox C1 Ergebnis 6,28318
MsgBox C2 Ergebnis 0,09269875
End Sub
Sponsoren und Investoren

Sponsoren und Investoren sind jederzeit herzlich willkommen!
Wenn Sie die Information(en) auf dieser Seite interessant fanden, freuen wir uns über eine kleine Spende. Empfehlen Sie uns bitte auch in Ihren Netzwerken (z. B. Twitter, Facebook oder Google+). Herzlichen Dank!

Nach oben Sitemap
Impressum & Kontakt