Switch Function

뒀에 값이 μ˜€λŠ” μ‹μœΌλ‘œ κ΅¬μ„±λœ 인수 λͺ©λ‘μ„ ν‰κ°€ν•©λ‹ˆλ‹€. Switch ν•¨μˆ˜λŠ” μžμ‹ μ΄ μ „λ‹¬ν•œ 식과 μ—°κ΄€λœ 값을 κ΅¬ν•©λ‹ˆλ‹€.

ꡬ문:

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

맀개 λ³€μˆ˜:

Switch ν•¨μˆ˜λŠ” μ™Όμͺ½μ—μ„œ 였λ₯Έμͺ½μœΌλ‘œ 식을 ν‰κ°€ν•œ λ‹€μŒ ν•¨μˆ˜ 식에 ν• λ‹Ήλœ 값을 κ΅¬ν•©λ‹ˆλ‹€. 식과 값이 쌍으둜 μ œκ³΅λ˜μ§€ μ•Šμ„ 경우 λŸ°νƒ€μž„ 였λ₯˜κ°€ λ°œμƒν•©λ‹ˆλ‹€.

Expression: 평가할 μ‹μž…λ‹ˆλ‹€.

Value: 식이 True일 경우 ꡬ할 κ°’μž…λ‹ˆλ‹€.

λ‹€μŒμ˜ μ˜ˆμ—μ„œ Switch ν•¨μˆ˜λŠ” μ „λ‹¬λœ 이름에 μ μ ˆν•œ 성별을 ν• λ‹Ήν•©λ‹ˆλ‹€.

Error codes:

5 잘λͺ»λœ ν”„λ‘œμ‹œμ € ν˜ΈμΆœμž…λ‹ˆλ‹€.

예:

Sub ExampleSwitch

Dim sGender As String

    sGender = GetGenderIndex( "John" )

    MsgBox sGender

End Sub

 

Function GetGenderIndex (sName As String) As String

    GetGenderIndex = Switch(sName = "Jane", "female", sName = "John", "male")

End Function