IBM Lotus Symphony


Select...Case-setningen [kjøretid]

Definerer en eller flere setningsblokker avhengig av verdien av et uttrykk.

Syntaks:

Select Case condition Case expression Statement Block [Case expression2 Statement Block][Case Else] Statement Block End Select

Parametere:

Betingelse: En betingelse som kontrollerer om setningsblokken som følger det respektive Case-leddet, blir utført.

Uttrykk: Et uttrykk som er kompatibelt med setningen for betingelsestype. Setningsblokken som følger etter Case-leddet, utføres hvis Betingelse samsvarer med Uttrykk.

Eksempel:

Sub ExampleRandomSelect

Dim iVar As Integer

iVar = Int((15 * Rnd) -2)

Select Case iVar

Case 1 To 5

Print "Tall fra 1 til 5"

Case 6, 7, 8

Print "Tall fra 6 til 8"

Case 8 To 10

Print "Større enn 8"

Case Else

Print "Utenfor området 1 til 10"

End Select

end sub


Tilbakemelding om produktet | Annen dokumentasjon | Varemerker