<종합문제 1>
Private Sub Command1_Click()
Label3.Caption = (Text1.Text) \ 2
Label5.Caption = (Text1.Text) Mod 2
End Sub
<종합 문제 2>
Private A As Boolean
Private B As Boolean
Private Sub Command1_Click()
A = Text1.Text
B = Text2.Text
Label2.Caption = A And B
End Sub
Private Sub Command2_Click()
A = Text1.Text
B = Text2.Text
Label2.Caption = A Or B
End Sub
Private Sub Command3_Click()
A = Text1.Text
B = Text2.Text
Label2.Caption = Not A
End Sub
Private Sub Command4_Click()
A = Text1.Text
B = Text2.Text
Label2.Caption = Not B
End Sub
Private Sub Command5_Click()
A = Text1.Text
B = Text2.Text
Label2.Caption = A Xor B
End Sub
Private Sub Command6_Click()
A = Text1.Text
B = Text2.Text
Label2.Caption = A Eqv B
End Sub
Private을 Dim으로 바꿔도 됨.
변수 i의 결과 값 변화를
추적하여 지역 변수, 모듈 변수,
모듈 변수, 전역 변수의
통용 범위를 비교한다.
반지름이 3인 원의 넓이와
둘레를 구하는 프로그램을
구하여라.
(단, π = 3.14)
PROGRAM 2-2.
국어, 영어 점수를 입력받아
변수에 저장하고 총점과 평균을
구한다.
QUESTION 2-2.
레이블에 있는 '비주얼'과
'베이직'을 문자열 연결 연산자(&)를
이용해 합쳐서 출력하는 프로그램을
작성하여라.
예제1.
세 자리 숫자의 각 자릿수
출력하기.