수안보중학교 로고이미지

RSS 페이스북 공유하기 트위터 공유하기 카카오톡 공유하기 카카오스토리 공유하기 네이버밴드 공유하기 프린트하기
8. IF문 사용하기(정답 찾기)
작성자 컴샘 등록일 19.09.18 조회수 51

문제 8

If문 이용하기

 문제 수준 : 하

 문제 유형 : 정답 찾아내기

 

   간단한 퀴즈에 대한 정답을 채점하여 메시지 박스로 정답 확인을 할 수 있는 프로그램을 작성하시오.

 

  1) 입력되는 값은 문자열이다.

  2) '정답 확인하기' 버튼을 클릭하면 정답인지 여부를 파악하여 메시지 박스로 출력한다.

 

             

 

Private Sub Com_정답_Click()

Dim 답안 As String   

Dim Str As String

Str = Text_답.Text

답안 = "4년"

If Str = 답안 Then

    MsgBox "정답입니다."

Else

    MsgBox "다시 한 번 생각해보세요."

End If

End Sub 

이전글 9. 다중 If문 사용하기
다음글 7. IF문 사용하기(홀수와 짝수 구분)