IBM Lotus Symphony


Select...Case-lause [käytönaikainen]

Määrittää lausekkeen arvon mukaan ainakin yhden lauselohkon.

Syntaksi:

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

Parametrit:

Condition: Mikä tahansa lauseke, joka ohjaa sitä, suoritetaanko kyseistä Case-lausetta seuraava lauselohko.

Expression: Mikä tahansa lauseke, joka on yhteensopiva Condition-tyypin lausekkeen kanssa. Case-lausetta seuraava lauselohko suoritetaan, jos Condition ja Expression vastaavat toisiaan.

Esimerkki:

Sub ExampleRandomSelect

Dim iVar As Integer

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

Select Case iVar

Case 1 To 5

Print "Number from 1 to 5"

Case 6, 7, 8

Print "Number from 6 to 8"

Case 8 To 10

Print "Greater than 8"

Case Else

Print "Out of range 1 to 10"

End Select

end sub


Palautetta tuotteesta | Lisäohjeet | Tavaramerkit