====== Select..case ====== **문법** \\ ''**Select Case ** 수식'' \\    ''Case 값 [, 값]'' \\     ''명령문'' \\    ''[Case 값 [, 값]]'' \\     ''[명령문]'' \\    ''[Case Else]'' \\     ''[명령문]'' \\ ''End Select'' ==== 설명 ==== 조건에 따라 여러명령문중 하나의 명령문을 실행하는 제어문입니다. ==== 사용예 ==== Select Case A ' A의 내용을 가지고 비교합니다. Case 1 B = 0 Case 2 B = 2 Case 3,4,5,6 ‘값이 여러 개일 때에는 콤마(,)로 분리합니다. B = 3 Case Is < 1 ‘부등호를 사용할 때에는 IS예약어를 사용합니다. B = 3 Case Else ‘그 외의 경우에는 ELSE를 사용합니다. B = 4 End Select Dim K AsInteger Dim R As Integer K=Adin(0) ‘0번 채널에서 AD입력 Select Case K Case Is < 10 ‘10보다 작은 값일 경우 R = 0 Case Is < 40 ‘40보다 작은 값일 경우 R = 1 Case Is < 80 R = 2 Case Is < 100 R = 3 Case Else R = 4 End Select [[cubloc:|명령어 목록으로 가기]]