C Visual Basic 기본문법 -　비교문(If,Select)

Cugain 2007.02.21 14:48 조회 수 : 250 추천:129

비교문
? If ... Then ... Else
만약(if) 조건이 만족되면(then) 뭐뭐뭐를 실행하고 아니면(else) 뭐뭐뭐를 실행해라.

?If 조건식 then 실행코드  [Else 실행코드]
'위에 식은 end if 가 없다.  가장 간단한 if문이다.

?If 조건식 Then
  실행코드     ' 조건식에 만족하면 실행된다.
  Else
  실행코드     '조건식에 만족 못할때 실행된다.
  End If
'가장 일반적인 If 문이다.		 ?If 조건식 Then
  실행코드
'if 문안에 또다른 If 문이 있다.  
  ElseIf 조건식 Then  실행코드
 ElseIf 조건식 Then 실행코드
     .
     .
  Else
  실행코드
  End If
예제1) 만약 텍스트박스의 텍스트가 "하하하" 라면 메시지박스로 "미친넘" 이라는 글을 보여주고 "하하하"가 아니라면 "싸이코"라는 글을 보여줘라.
If text1.text = "하하하"  then
MsgBox "미친넘"
Else
MsgBox "싸이코"
End If
예제2) 예제1과 동일하며 그와중에 "히히히"라고 쓴넘이 있다면 메시지박스로 "바보아냐" 라는 글을 보여줘라. 
If text1.text = "하하하"  then
MsgBox "미친넘"
ElseIf text1.text = "히히히" then MsgBox "바보아냐"
Else
MsgBox "싸이코"
End If
Select Case 비교대상    '흔히 어떤값을 변수로 받아서 그변수를 사용한다.
Case 값1    '비교대상의 값이  이거라면 아래 실행코드가 실행된다.( 값을 나열해도 되고 범위를 사용해도 된다.  Case 1,2,3,4,5.   또는 Case 1 to 5)
실행코드     
Case 값2
실행코드
.....
.....
Case Else   '위에 case에 나온값이 아닌 나머지 다른것들을 전부 처리한다.(생략 가능)
실행코드
End Select

예제)만약 텍스트박스의 텍스트가 "하하하" 라면 메시지박스로 "미친넘" 이라는 글을 보여주고 "히히히" 라면 "싸이코"라고 보여주고, "호호호" 라면 "바보"라고 메시지박스에 보여주고 이도저도 아니면 "너 죽는다." 라고 보여줘라

Private Sub Command1_Click()
Dim aa As String
aa = Text1.Text
Select Case aa 
Case "하하하"    
MsgBox = "미친넘"
Case "히히히"
MsgBox = "싸이코"
Case "호호호"
MsgBox = "바보"
Case Else
MsgBox = "너 죽는다."
End Select 		예제2) 번호 맞추기 답은 50
Private Sub Command1_Click()
Dim aa As Integer
aa = Text1.Text
Select Case aa
Case 1 to 49       'case절안에 값뿐아니라 식이나 범위가 사용가능하다.
MsgBox = "더 크지롱~"        '식을 사용할때는 case is < 50  이런식으로...
Case 51 to 100
MsgBox = "더 작지롱~"
Case 50
MsgBox = "맞았당"
Case Else
MsgBox = "너 바보쥐?"
End Select
이 게시물을
수정 삭제 목록
쓰기 태그