Switch Function

Hindab avaldisest ja sellele järgnevast väärtusest koosnevate argumentide loendit. Funktsioon Switch tagastab väärtuse, mis seostatakse selle funktsiooni edastatava avaldisega.

Switch (Expression1, Value1[, Expression2, Value2[..., Expression_n, Value_n]]) As Variant

Funktsioon Switch analüüsib avaldisi vasakult paremale ja tagastab seejärel funktsiooni avaldisele omistatud väärtuse. Kui avaldis ja väärtus pole esitatud paarina, ilmneb käitusajaviga.

Expression: avaldis, mille väärtust soovid leida.

Value: väärtus, mis tagastada, kui avaldis on tõene.

Järgmises näites omistab funktsioon Switch ette antud nimele sobiva soo.

Sub ExampleSwitch
Dim sGender As String
    sGender = GetGenderIndex( "John" )
    MsgBox sGender
End Sub
 
Function GetGenderIndex (sName As String) As String
    GetGenderIndex = Switch(sName = "Jane", "naissoost", sName = "Jaan", "meessoost")
End Function