Choose Function

인수 λͺ©λ‘μ—μ„œ μ„ νƒν•œ 값을 κ΅¬ν•©λ‹ˆλ‹€.

ꡬ문:

Choose (Index, Selection1[, Selection2, ... [,Selection_n]])

맀개 λ³€μˆ˜:

Index: ꡬ할 값을 μ§€μ •ν•˜λŠ” 숫자 μ‹μž…λ‹ˆλ‹€.

Selection1: κ°€λŠ₯ν•œ 선택 ν•­λͺ© 쀑 ν•˜λ‚˜λ₯Ό ν¬ν•¨ν•˜λŠ” μž„μ˜μ˜ μ‹μž…λ‹ˆλ‹€.

Choose ν•¨μˆ˜λŠ” 색인 값에 κΈ°μ΄ˆν•˜μ—¬ 식 λͺ©λ‘μ—μ„œ 값을 κ΅¬ν•©λ‹ˆλ‹€. 예λ₯Ό λ“€μ–΄, 색인 = 1일 경우 λͺ©λ‘μ˜ 첫 번째 식이 ꡬ해지며, 색인 = 2일 경우 두 번째 식이 κ΅¬ν•΄μ§‘λ‹ˆλ‹€.

색인 값이 1보닀 μž‘κ±°λ‚˜ λ‚˜μ—΄λœ 식 μˆ˜λ³΄λ‹€ 클 경우 Null 값이 κ΅¬ν•΄μ§‘λ‹ˆλ‹€.

λ‹€μŒμ€ Choose ν•¨μˆ˜λ₯Ό μ‚¬μš©ν•˜μ—¬ 메뉴λ₯Ό κ΅¬μ„±ν•˜λŠ” μ—¬λŸ¬ λ¬Έμžμ—΄μ—μ„œ λ¬Έμžμ—΄μ„ μ„ νƒν•˜λŠ” μ˜ˆμž…λ‹ˆλ‹€.

Error codes:

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

예:

Sub ExampleChoose

Dim sReturn As String

    sReturn = ChooseMenu(2)

    Print sReturn

End Sub

 

Function ChooseMenu(Index As Integer)

    ChooseMenu = Choose(Index, "Quick Format", "Save Format", "System Format")

End Function