문법
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

명령어 목록으로 가기