본문 바로가기
IT정보/비주얼베이직

[비주얼베이직] (문법) Select Case문 (문자로 결과 계산)

by 곰사랑 2011. 7. 11.

조건문은 입력되는 값에 따라 서로 다른 명령을 실행할 때 자주 사용되지만 조건이 여러 개인 경우에는 불편하다. 이럴 경우에 사용하는 명령이 "Select Case" 문장이다. "Select Case"는 입력된 여러 조건을 동시에 처리할 수 있는 조건문으로 여러 조건이 나열되어 있는 경우에 편리하게 사용된다. "Select Case"는 문자를 이용하는 방법과 숫자를 이용하는 방법으로 구분할 수 있다.

Text1 제품코드 입력될 텍스트
Text2 판매수량 입력될 텍스트
Text3 제품명 출력될 텍스트
Text4 판매금액 출력될 텍스트
Command1 결과 입력 버튼

이와 같이 디자인해주세요 ㅎ



소스
Private Sub Command1_Click()            '// 결과입력 버튼
Select Case Text1.Text           '// 제품코드 (Text1)
Case "A"                 '// 제품코드(Text1) 에 A를 입력하면
         Text3.Text = "서든어택"               '// 제품명(Text3) 에 서든어택이 표시된다.
          판매단가 = 20000                       '// 판매수량을 적으면 판매단가가 표시된다.
Case "B"
         Text3.Text = "스타크래프트"
         판매단가 = 30000
Case "C"
          Text3.Text = "포트리스"
          판매단가 = 14000
Case Else       '// 제품코드(Text1)에 없거나 다른, 다를때
          Text3.Text = "등록되지 않는 제품입니다."      '// 등록되지 않는 제품이라고 뜬다
          판매단가 = 0
End Select

Text4.Text = 판매단가 * Val(Text2.Text)                '// 판매수량에 수 를 입력하면 판매금액(Text4) 에 값이 표시된다. 
End Sub


Select Case문 (문자로 결과 계산) 예제



Select Case 문자열

    Case 문자1
                         명령1
    Case 문자2
                         명령2
    Case 문자3
                         명령3
    Case Else
                         명령4
End Select

문자열이 '문자1' 이면 '명령1' 이 수행, '문자2' 이면 '문자2'가 수행, '문자3' 이면 '명령3' 이 수행되며, 해당되는 글자가 없으면
'명령4'가 수행된다.

이상으로 Select Case문자열 포스팅을 마치겠습니다.

댓글3