[비주얼 베이직 6.0] 제 9장

[제 8장 - 연산자]에서 우리는, 연산자를 이용해서 값을 구했습니다. 하지만 일상생활을 하는데 이렇게 단순한 계산만 할수는 없죠. 예를들면 성적관리표나 가계부, pos기기 같이 특정 조건을 만족해야만 답을 보여주는 일도 일어나니까요.

그래서 오늘은 조건을 만족했을때 결과를 출력하는 프로그램을 만들어 보겠습니다. 이전 강좌에서 배웠던 것들을 이것저것 써먹을것이니, 복습겸 진행해주시기 바랍니다.

조건문은 크게 두가지로, IF 와 CASE 가 있습니다. 아래와 같은 방법으로 사용됩니다.

if 조건식결과 then

실행

elseif 조건식결과 then

실행

else

실행

end if

select case 조건식

case 결과

실행

case else

실행

end select

조건문을 사용할때 가장 신경써야 하는 부분은 elseif와 else입니다.

if의 조건식을 만족하면 elseif나 else를 거치지 않고 end if로 곧장 가버려서 다음줄을 실행하기 때문에 주의하셔야 합니다.

위 소스를 풀이해 보겠습니다.

dim a as byte

dim b as byte

일단 a와 b를 각각 byte로 선언했습니다. 요소에 종속되지 않기 때문에 이것은 지역변수가 아닙니다. 전역변수입니다.

a = 0

b = 255

폼을 불러올때(프로그램 실행) a 변수에는 0 이라는 숫자를, b 변수에는 255라는 문자를 대입합니다. "255" 이렇게 하지 않고 255라고만 써줘도 됩니다.

text1.text = vbnullstring

command1.caption = "if"

command2.caption = "case"

텍스트박스에는 빈칸을, 커맨드 버튼에는 if와 case 라는 이름을 넣어줬습니다.

컴파일을 하면 위와 같습니다.

이제 텍스트박스에 0을 넣고 if를 클릭하면 0입니다. 라는 메세지를 출력하고, 255를 넣고 if를 클릭하면 255입니다. 라는 메세지를 출력합니다.

case 또한 같은 결과를 출력할 식을 넣었기 때문에 같은 메세지를 출력합니다. 0과 255가 아닌 다른 숫자를 넣으면 0도 255도 아닙니다. 라는 메세지를 출력합니다.

여기서 숫자가 아닌 다른 문자를 넣으면 위에서 선언한 byte 와 충돌하여 미스매치라는 에러메세지를 출력하며 프로그램이 멈춰버립니다.

앞선 강좌에서 말씀드렸다시피 byte는 0부터 255까지의 숫자만 담을 수 있기 때문입니다.

특정 조건을 만족했을때 결과를 출력하는 프로그램을 만들어 봤습니다.

응 아니야