생선이의 잡다한 블로그

[VB.NET]비주얼베이직 기본강좌 5 - If문, 조건문 본문

프로그래밍/[VB.NET]비주얼베이직 강좌

[VB.NET]비주얼베이직 기본강좌 5 - If문, 조건문

생선스프 2016. 8. 3. 09:00
반응형

안녕하세요 생선입니다

 

이번 강좌에서는 IF 문에대해 알아보도록 하겠습니다

 

If 조건문 Then

End If

 

이것이 기본 형태이며

 

만약 조건문이 거짓일때 동작시킬 소스가 있다면

 

If 조건문 Then

Else

'소스

End If

 

위와같이 적어주면 됩니다

 

한번 바로 예제를 보도록 하죠

 

일단 티스토리로 갈건지 물어보는 메시지 박스를 띄우기위해

버튼에

 

If Msgbox("티스토리로 가시겠습니까?"+vbCrlf+"아래 버튼으로 답을 해주세요", vbQuestion+vbYesNo , "티스토리로 이동?") = vbYes Then

Shell("explorer http://www.tistory.com")

End If

 

이렇게 입력해 주도록 하겠습니다

그러면 아래와 같이 뜨며 예를 누를시 입력해둔 주소가 뜨게 됩니다

 

(메시지 박스 강좌 보러가기)

 

만약 바로위 사진에서 아니요를 눌렀을때 "알았어 가지마"를 띄우고 싶을때

 

If Msgbox("티스토리로 가시겠습니까?"+vbCrlf+"아래 버튼으로 답을 해주세요", vbQuestion+vbYesNo , "티스토리로 이동?") = vbYes Then

Shell("explorer http://www.tistory.com")

Else

Msgbox("알았어 가지마",,)

End If

 

위와 같이 적어주면 됩니다

즉 Else는 아닐 경우라는 것이죠

 

그런데 만약 예,아니요,취소 가 있을때는 어떻게 할까요?


Dim  result = Msgbox("티스토리로 가시겠습니까?"+vbCrlf+"아래 버튼으로 답을 해주세요", vbQuestion+vbYesNoCancel , "티스토리로 이동?")

If  result = vbYes Then

Shell("explorer http://www.tistory.com")

ElseIf result = vbNo Then

Msgbox("알았어 가지마",,)

Else

Msgbox("취소눌렀네?",,)

End If

 

이와 같이 써주시면 됩니다

 

 

이상으로 강좌 마치도록 하겠습니다.

 

강좌 봐주셔서 감사합니다

 

공감과 덧글은 글쓴이에게 힘이됩니다!

더 많은 비주얼베이직 강좌보러 가기

반응형
Comments