zurück Home

Visual - Basic: Schleifen, Bedingungen

Allgemeines

 
If Then If Bedingung Then
###
End If
If Bedingung Then
###
Else
###
End If
einzeiliges If If Bedingung Anweisung nur eine Anweisung
Then nicht erforderlich
Else nicht möglich
ElseIf If 1.Bedingung Then
xxx
ElseIf 2.Bedingung
xxx
ElseIf 3. Bedingung
xxx
ElseIf 4. Bedingung
xxx
Else (keine Bedingung erfüllt)
xxx
End If
Neue Syntax in Access:
If
1.Bedingung Then
xxx
Else
If
2.Bedingung then  xxx
Else
If
3. Bedingung then  xxx
Else
If
4. Bedingung then xxx
Else (keine Bedingung erfüllt)
xxx
End If
Select Select Case X
Case Is = 0:
xxx
Case IsDate(X):
xxx
Case IsNumeric(X):
xxx
Case Else:
xxx
End Select
Select Case P1![ANREDE]
Case IsNull(P1![ANREDE])
Print #1, " Sehr verehrte Frau " + Trim(P1![NAME]) + "!"
Case "H"
Print #1, " Sehr geehrter Herr " + Trim(P1![NAME]) + "!"
Case "F"
Print #1, " Sehr verehrte Frau " + Trim(P1![NAME]) + "!"
End Select
abweisende Do-Schleife Do While Bedingung
XXX
Loop
nicht abweisende Do-Schleife Do
XXX
Loop Until Bedingung
Exit Do Do
XXX
If Bedingung Then Exit Do
Loop
For – Next For X = A To B Step C
xxx
Next X
For X = A To B Step C
xxx
If Bedingung Then exit for
Next X
On-Error-Anweisung  
Ereignisse  

Impressum                           Zuletzt geändert am 13.01.2015 6:21