http://www.yes24.com/Product/Goods/84909299
대표적인 조건 분기 구문은 앞서 학습한 IF문이다. 그리고 지금 학습할 SELECT CASE문은 선택하여 조건 분기하는 구문으로 IF문과 유사한 기능을 수행하는 제어문 중 하나이다. SELECT CASE문은 다중의 조건을 처리할 때 매우 유용하게 활용된다. IF문의 경우에도 ELSEIF문을 활용하여 다중의 조건을 처리할 수 있지만 분기해야 할 조건이 많을 경우에는 SELECT CASE문이 훨씬 유리하다.
대상이 조건에 부합되면 결과를 실행하는 구문이다. IF문과 비교했을 때 문법만 다를뿐 활용 방식은 동일하다.
1)입력 셀에 사용자가 1에서 5까지의 숫자를 입력한다고 가정
2)입력된 값을 확인하여 해당 숫자를 출력하는 프로그램
Sub F11_01()
Dim IN_VALUE As Integer
Dim PRINT_STR As String
IN_VALUE = Worksheets("Sheet1").Cells(2, 2).Value
Select Case IN_VALUE
Case 1
PRINT_STR = "1을 입력 하셨습니다."
Case 2
PRINT_STR = "2를 입력 하셨습니다."
Case 3
PRINT_STR = "3을 입력 하셨습니다."
Case 4
PRINT_STR = "4를 입력 하셨습니다."
Case 5
PRINT_STR = "5를 입력 하셨습니다."
End Select
Worksheets("Sheet1").Cells(3, 3).Value = PRINT_STR
End Sub