제2장 기본 문법 (2) 주제 : 연산자, 조건문, 반복문 2018-12-05 수원과학대학 컴퓨터정보과

목차 연산자 사용하기 조건문 사용하기 반복문 사용하기 2018-12-05 수원과학대학 컴퓨터정보과

1. 연산자 사용하기 (1) 대입문 연산자 산술연산자 관계연산자(비교연산자) 논리연산자 문자열결합 연산자 +, -, *, /, ^, Mod 관계연산자(비교연산자) <, <=, >, >=, =, <> 논리연산자 and, or, not, xor, eqv, imp 문자열결합 연산자 &, + 대입문 대입연산자(=) 오른쪽 의 결과를 왼쪽 변수에 저장 변수 = 수식 용도 변수를 선언하고 변수에 값 을 저장할 때 수식의 결과를 저장할 때 컨트롤의 속성 값을 변경할 때 컨트롤이름.속성이름=변경 하고자 하는 속성 값 변수=컨트롤이름.속성이름 2018-12-05 수원과학대학 컴퓨터정보과

1. 연산자 사용하기 (2-1) ( )연산자 연산자 기능 사용 예 설명 + 더하기 c = a + b - 빼기 c = a – b ( )연산자 연산자 기능 사용 예 설명 + 더하기 c = a + b - 빼기 c = a – b * 곱하기 c = a * b / 나누기 c = a / b ^ 제곱 c = a ^ b a의 b제곱승 Mod 나머지 c = a Mod b a를 b로 나눈 나머지 값 2018-12-05 수원과학대학 컴퓨터정보과

1. 연산자 사용하기 (2-2) 산술연산자 예제 3장8.vbp Private Sub Form_DblClick() Dim a As Integer Dim b As Integer Dim c As Integer a = 10 b = 3 c = a + b Form1.Print c c = a - b c = a * b c = a / b c = a ^ b c = a Mod b End Sub 산술연산자 예제 2018-12-05 수원과학대학 컴퓨터정보과

1. 연산자 사용하기 (2-3) 산술연산자 실습 2018-12-05 수원과학대학 컴퓨터정보과

1. 연산자 사용하기 (2-4) + 커맨드 버튼의 코딩 문자열을 숫자로 변환하는 함수 Val(“1234”) → 문자열 “1234”를 숫자 1234로 변환 Private Sub Command1_Click() Text3.Text = Text1.Text + Text2.Text End Sub + 연산자가 문자열 연결연산자로 동작 Private Sub Command1_Click() Text3.Text = Val(Text1.Text) + Val(Text2.Text) End Sub 2018-12-05 수원과학대학 컴퓨터정보과

1. 연산자 사용하기 (3-1) ( ) 연산자 연산자 기능 사용 예 설명 > 크다 a > b ( ) 연산자 연산자 기능 사용 예 설명 > 크다 a > b a가 b보다 크면 결과는 True >= 크거나 같다 a >= b a가 b보다 크거나 같으면 True < 작다 a < b a가 b보다 작으면 결과는 True <= 작거나 같다 a <= b a가 b보다 작거나 같으면 True 같다 a = b a와 b가 같으면 True 같지 않다 a <> b a와 b가 같지 않으면 True 2018-12-05 수원과학대학 컴퓨터정보과

1. 연산자 사용하기 (3-2) 관계연산자 예제 3장9.vbp Private Sub Form_DblClick() Dim a As Integer Dim b As Integer Dim c As Integer a = 10 b = 3 Form1.Print a > b Form1.Print a >= b Form1.Print a < b Form1.Print a <= b Form1.Print a = b Form1.Print a <> b End Sub 관계연산자 예제 2018-12-05 수원과학대학 컴퓨터정보과

1. 연산자 사용하기 (4-1) ( ) 연산자 연산자 기능 사용예 설명 논리곱 a And b ( ) 연산자 연산자 기능 사용예 설명 논리곱 a And b a, b가 모두 True면 결과는 True 논리합 a Or b a와 b중 하나만 True면 True 논리부정 Not a a가 True면 False, False면 True 배타적 논리합 a Xor b a와 b중 하나는 True, 하나는 False면 True Eqv 논리적 등가 a Eqv b a와 b가 모두 True이거나 False이면 True Imp 포함 (implicant) a Imp b 앞의 식 a가 True이고, 뒤의 식 b가 False일때만 False (if a then b, else True) 2018-12-05 수원과학대학 컴퓨터정보과

1. 연산자 사용하기 (4-2) 논리연산 결과 연산자 T F And Or Xor Eqv Imp 2018-12-05 수원과학대학 컴퓨터정보과

1. 연산자 사용하기 (4-3) 논리연산자 예제 3장10.vbp Private Sub Form_DblClick() Dim a As Integer Dim b As Integer Dim c As Integer a = 10 b = 3 Form1.Print (a < 11) And (b > 2) Form1.Print (a < 11) Or (b < 2) Form1.Print Not (a < 11) Form1.Print (a < 11) Xor (b < 2) Form1.Print (a < 11) Eqv (b > 2) Form1.Print (a < 11) Imp (b < 2) End Sub 논리연산자 예제 2018-12-05 수원과학대학 컴퓨터정보과

1. 연산자 사용하기 (5-1) ( ) 연산자 연산자 설명 + 문자를 연결한다. ( ) 연산자 연산자 설명 + 문자를 연결한다. * 숫자와 문자열이 혼재하는 경우 숫자로 변환함 & 숫자나 문자를 자유롭게 연결한다. (이 연산자를 사용하는 게 편하다.) 2018-12-05 수원과학대학 컴퓨터정보과

1. 연산자 사용하기 (5-2) 연결연산자 예제 Private Sub Form_DblClick() 3장11.vbp 연결연산자 예제 Private Sub Form_DblClick() Form1.Print "100" + "won" Form1.Print "일백" + "원" Form1.Print 100 & 200 Form1.Print "일백" & "원" End Sub Print 100 + 200 Print "100" & 200 Print 100 + "200 " Print 100 & 200 2018-12-05 수원과학대학 컴퓨터정보과

2. 조건문 사용하기(1) ( ) 이란? 조건문의 형식 조건에 따라 각기 다른 명령어들을 수행해야 할 경우 사용하는 문장 ( ) 이란? 조건에 따라 각기 다른 명령어들을 수행해야 할 경우 사용하는 문장 조건문의 형식 If … Then If … Then … End If If … Then … Else … End If If … Then … Elseif … End If Select Case … End Select 2018-12-05 수원과학대학 컴퓨터정보과

2. 조건문 사용하기(2-1) If 조건식 Then 명령문 만일 (If) 조건식이 맞으면(True), 명령문을 수행한다. 여러 명령문을 한 줄에 기술할 경우 명령문A : 명령문B : .. : 명령문Z 명령문과 명령문사이는 : 을 넣는다. 예) If A < 10 Then Form1.Print A : Form1.Print “A값임” 2018-12-05 수원과학대학 컴퓨터정보과

2. 조건문 사용하기(2-2) 조건문(if then) 예제 Private Sub Form_DblClick() 3장12.vbp 조건문(if then) 예제 Private Sub Form_DblClick() Dim 점수 As Integer 점수 = 50 Print "------ if then ------" If 점수 < 60 Then Form1.Print 점수 & "점은 낙제입니다!" End Sub 2018-12-05 수원과학대학 컴퓨터정보과

2. 조건문 사용하기(3-1) If 조건문 Then 명령문들 End If 조건문이 맞으면, 명령문들을 수행한다. 2018-12-05 수원과학대학 컴퓨터정보과

2. 조건문 사용하기(3-2) 조건문(if then end if) 예제 3장13.vbp Private Sub Form_DblClick() Dim 점수 As Integer 점수 = 50 Print "------ if then end if ------" If 점수 < 60 Then Print "낙제입니다!" Print "재수강 신청하세요." Print "마감일은 12월 20일 입니다." End If End Sub 2018-12-05 수원과학대학 컴퓨터정보과

2. 조건문 사용하기(4-1) If 조건식 Then 명령문들1 Else 명령문들2 End If 조건식이 맞으면(True) 명령문들1을 수행하고, 조건식이 틀리면(False) 명령문들2를 수행한다. 2018-12-05 수원과학대학 컴퓨터정보과

2. 조건문 사용하기(4-2) 조건문(if else) 예제 3장14.vbp Private Sub Form_DblClick() Dim 점수 As Integer 점수 = 50 If 점수 < 60 Then Form1.Print "낙제입니다!" Form1.Print "재수강 신청하세요." Form1.Print "마감일은 12월 20일 입니다." Else Form1.Print "낙제가 아닙니다!" Form1.Print "재수강 신청하지 마세요." Form1.Print "마감일 신경쓰지 마세요." End If Form1.Print 점수 End Sub 조건문(if else) 예제 2018-12-05 수원과학대학 컴퓨터정보과

2. 조건문 사용하기(4-3) 두 수를 입력받고 크기비교 버튼을 누르면 두 수의 크기 관계를 출력한다. 2018-12-05 수원과학대학 컴퓨터정보과

2. 조건문 사용하기(5-1) If 조건식1 Then 조건식1이 맞으면 명령문들1을 수행 명령문들1 ElseIf 조건식2 Then 명령문들2 ElseIf 조건식3 Then 명령문들3 … Else 명령문들n End If 조건식1이 맞으면 명령문들1을 수행 조건식2가 맞으면 명령문들2를 수행 조건식3이 맞으면 명령문들3을 수행 그 외의 조건이면 명령문들n를 수행 2018-12-05 수원과학대학 컴퓨터정보과

2. 조건문 사용하기(5-2) 조건문 (if elseif else) 예제 3장15.vbp Private Sub Form_DblClick() Dim 점수 As Integer 점수 = 50 If 점수 >= 90 Then Form1.Print "A 학점입니다." ElseIf 점수 >= 80 Then Form1.Print "B 학점입니다." ElseIf 점수 >= 70 Then Form1.Print "C 학점입니다." ElseIf 점수 >= 60 Then Form1.Print "D 학점입니다." Else Form1.Print "F 학점입니다." End If End Sub 조건문 (if elseif else) 예제 2018-12-05 수원과학대학 컴퓨터정보과

2. 조건문 사용하기(5-3) 실습 예제에서 같은 숫자를 입력한 경우에 대해 elseif 를 사용하여 코딩 예) 10 < 20 , 20 > 10 , 20 = 20 으로 출력 2018-12-05 수원과학대학 컴퓨터정보과

2. 조건문 사용하기(6-1) Select Case 식 Case 값1 명령문들1 Case 값2 명령문들2 … Case Else 명령문들n End Select 식이 값1이면 명령문들1을 수행 식이 값2이면 명령문들2를 수행 식이 Case의 모든 값들에 해당되지 않으면, 명령문들n을 수행 2018-12-05 수원과학대학 컴퓨터정보과

2. 조건문 사용하기(6-2) Case 조건식 Case문 예 Case 값1 [, 값2, 값3,…] Case 1, 2, 3 Case Is 관계연산자 값 Case Is >= 90 Case Is < 0, Is > 100 Case 최소값 To 최대값 Case 0 To 10 Case 10 To 0 (X) 2018-12-05 수원과학대학 컴퓨터정보과

2. 조건문 사용하기(6-2) 조건문 (Select case) 예제 3장16.vbp Private Sub Form_DblClick() Dim 점수 As Integer 점수 = 50 Select Case 점수 Case 90 To 100 Form1.Print "A 학점입니다." Case 80 To 89 Form1.Print "B 학점입니다." Case 70 To 79 Form1.Print "C 학점입니다." Case 60 To 69 Form1.Print "D 학점입니다." Case Else Form1.Print "F 학점입니다." End Select End Sub 조건문 (Select case) 예제 2018-12-05 수원과학대학 컴퓨터정보과

2. 조건문 사용하기(6-3) Select Case예제 (3장16.vbp)를 If 문으로 바꾸어 작성해본다. 2018-12-05 수원과학대학 컴퓨터정보과

3. 반복문 사용하기(1) ( )이란? 반복문의 형식 동일한 작업을 여러 번 반복 수행해야 하는 경우에 쓰이는 문장 ( )이란? 동일한 작업을 여러 번 반복 수행해야 하는 경우에 쓰이는 문장 반복문의 형식 For… Next Do While … Loop Do … Loop While Do Until … Loop Do … Loop Until While … Wend 2018-12-05 수원과학대학 컴퓨터정보과

3. 반복문 사용하기(2-1) For 변수 = 초기값 To 최종 값 [Step 증감값] 명령문들 Next 변수에 초기값을 대입후 최종값보다 작거나 같을 때까지 증감값만큼 증가시키면서 명령문들을 수행함. 증감값을 생략하면 증감값은 +1로 생각 2018-12-05 수원과학대학 컴퓨터정보과

3. 반복문 사용하기(2-2) 3장17.vbp For문 사용하기 2018-12-05 수원과학대학 컴퓨터정보과

3. 반복문 사용하기(2-3) 3장18.vbp 중첩 For문 사용하기 2018-12-05 수원과학대학 컴퓨터정보과

3. 반복문 사용하기(2-4) 입력한 숫자의 구구단을 출력하는 예제 변수 i를 사용 (1부터 9까지) For 문 사용 Val(문자열) : 문자열을 숫자로 vbNewLine : 엔터값 2018-12-05 수원과학대학 컴퓨터정보과

3. 반복문 사용하기(2-5) 구구단 출력 변수 i,j를 사용 (1부터 9까지) 중첩For 문 사용 vbNewLine : 엔터값 커서위치 이동 : Text2.SelStart = Len(Text2) 2018-12-05 수원과학대학 컴퓨터정보과

3. 반복문 사용하기(2-6) 구구단을 역순으로 출력 변수 i,j를 사용 (1부터 9까지) 중첩For 문 사용 2018-12-05 수원과학대학 컴퓨터정보과

3. 반복문 사용하기(3-1) 조건식이 만족(True)하는 동안 명령문들을 반복 수행한다. (조건식이 False가 되면 Loop 다음 명령을 수행한다.) Do While 조건식 명령문들 Loop Do 명령문들 Loop While 조건식 명령문들을 수행하고 조건식이 True면 명령문들을 반복수행한다. 2018-12-05 수원과학대학 컴퓨터정보과

3. 반복문 사용하기(3-2) 3장19.vbp Do While문 2018-12-05 수원과학대학 컴퓨터정보과

3. 반복문 사용하기(3-3) 3장20.vbp Do Loop While문 2018-12-05 수원과학대학 컴퓨터정보과

3. 반복문 사용하기(4-1) Do Until 조건식 명령문들 Loop 조건식이 True가 될때까지 명령문들을 반복수행함. 단, 조건식에 정확한 값을 지정해야함.(관계연산자 사용안됨) Do 명령문들 Loop Until 조건식 명령문들을 먼저 수행하고, 조건식이 True가 될때까지 명령문들을 반복 수행한다. 2018-12-05 수원과학대학 컴퓨터정보과

3. 반복문 사용하기(4-2) 3장21.vbp Do Until문 2018-12-05 수원과학대학 컴퓨터정보과

3. 반복문 사용하기(4-3) 3장22.vbp Do Loop Until문 2018-12-05 수원과학대학 컴퓨터정보과

3. 반복문 사용하기(5-1) While 조건식 명령문들 Wend 조건식이 True이면 명령문들을 수행한다. 반복문 안에서 도중에 반복을 중단시키고자 할 경우 사용함. While Wend문에서는 Exit Do/Exit For사용 불가능 Exit Do : 해당되는 Do While/Do Until문 반복 종료 Exit For : 해당되는 For문 반복 종료 Exit Sub : 해당되는 서브프로시져 종료 2018-12-05 수원과학대학 컴퓨터정보과

3. 반복문 사용하기(5-2) 3장23.vbp While Wend문 2018-12-05 수원과학대학 컴퓨터정보과

3. 반복문 사용하기(5-3) 3장24.vbp Exit 문 2018-12-05 수원과학대학 컴퓨터정보과

3. 반복문 사용하기(5-4) 반복문의 종료 예 (결과예측) Option Explicit Private Sub Command1_Click() Dim i As Integer, j As Integer, x As Integer For i = 1 To 10 For j = 1 To 10 x = i * j If (x > 10) Then Exit For Form1.Print x Next End Sub 2018-12-05 수원과학대학 컴퓨터정보과