Visual Basic 2010 5 v btn InputClick v

Visual Basic 2010 기본 문법 5. 텍스트 박스에 이름을 입력하고, 이벤트 프로시저를 작성한다. v [지역변수] 버튼을 더블 클릭하여 코드 창을 열고, btn. Input_Click 이벤트 프로시저 를 다음과 같이 작성한다. v [결과출력] 버튼을 더블 클릭하여 코드 창을 열고, btn. Output_Click 이벤트 프로시저 를 다음과 같이 작성한다. Public Class Form 1 Private Sub btn. Input_Click(sender As System. Object, e As System. Event. Args) Handles btn. Input. Click Dim str. Name As String ＇프로시저변수 선언 str. Name = txt. Input. Text Message. Box. Show("당신의 이름은 " & str. Name & " 입니다. ") End Sub Private Sub btn. Output_Click(sender As System. Object, e As System. Event. Args) Handles btn. Output. Click Dim str. Name As String ＇프로시저변수 선언 Message. Box. Show(str. Name & " 씨, 안녕하세요. ") End Sub End Class 2020 -11 -27 19

Visual Basic 2010 기본 문법 3. 2 데이터 형식( Data Type) v 데이터 형식 선언 Ø 프로그램에서 사용하는 변수에 데이터를 저장하기 위해 데이터 형식 을 선언 [Dim|Private|Public|Protected|Friend|Shared|Static] 변수명 [As 데이터형식] ‘데이터 형식을 선언하는 예 Dim i. Amont As Integer Private ltotal As Long Public dbl. Count As Double Static str. Name As String 2020 -11 -27 ‘상수를 선언하는 방법 Constant i. Height As Long = 255 24

Visual Basic 2010 기본 문법 3. 2 데이터 형식( Data Type) v 기본 데이터 형식 Ø 수치 데이터 형식 (Numeric Data Type) Ø 문자 데이터 형식 (Character Data Type) Ø 이진 데이터 형식( Binary Data Type) Ø 기타 데이터 형식 1) 수치 데이터 형식 (Numeric Data Type) : 정수 형식과 부동소수점 형식 v 정수 형식 : SByte, Short, Integer, Long 형식 v 정수 형식의 저장 크기 및 값의 범위 데이터 형식 저장 크기 SByte 1 Byte -128 ~ 127 Short 2 Byte -32, 768 ~ 32, 767 Integer 4 Byte -2, 147, 483, 648 ~ 2, 147, 483, 647 Long 8 Byte 2020 -11 -27 값 범위 -9, 223, 372, 036, 854, 775, 808 ~ 9, 223, 372, 036, 854, 775, 807 25

Visual Basic 2010 기본 문법 3. 2 데이터 형식( Data Type) v 정수 자료형(Data Type) 정수형(Short) 2 바이트 크기 : -32, 768 ~ 32, 767 Ø 부호비트 0000 0000 0001 1000 0000 0001. . . 0111 1111 1111 15비트-> ⇒ 0 ⇒ 1 ⇒ -1 ⇒ 32768 ⇒ -32768 : 32768가지 선언 Dim 변수명 As Short 예) Dim My. Variable As Short Ø 2020 -11 -27 26

Visual Basic 2010 기본 문법 3. 2 데이터 형식( Data Type) 3) 이진 데이터 형식 : Byte, Boolean 형식 Ø Byte 형 : 0부터 255까지의 부호없는 수 Ø Boolean 형 : true 나 false 의 논리값 저장 데이터 형식 저장 크기 값 범위 Byte 1 Byte 0 ~ 255 Boolean 1 Byte True / False Dim by. My. Variable as Byte Dim b. Bool. Test as Boolean b. Bool. Test = 123 < 456 　 debug. writeline(b. Bool. Test) 　 2020 -11 -27 ‘논리비교 결과를 저장 ‘결과창에 “True" 출력 29

Visual Basic 2010 기본 문법 3. 2 데이터 형식( Data Type) v Nullable 형식 Ø Nullable 형식의 변수나 속성이 정의된 값을 포함하는 경우에 이러한 변수나 속성을 값이 할당되지 않은 초기 상태로 되돌릴 수가 있다. Children. No = Nothing Ø Nullable 형식의 변수 값을 검색하려면 먼저 해당 Has. Value 속성으로 값이 있는지 확인해야 한다. Has. Value가 False일 때 값을 읽으려고 하 면 Visual Basic에서는 Invalid. Operation. Exception 예외를 던진다. If Children. No. Has. Value Then Msg. Box("There are " & CStr(Children. No) & " children. ") Else Msg. Box("It is not known how many children there are. ") End If 2020 -11 -27 45

Visual Basic 2010 기본 문법 3. 2 데이터 형식( Data Type) v Nullable 형식 Ø Nullable Boolean 변수를 부울 식에 사용하는 경우의 결과는 True, False 또는 Nothing일 수 있다. Ø And 및 Or의 참 테이블에서 b 1 및 b 2에 세 개의 값을 사용할 수 있 으므로 총 9개 조합을 평가해야 한다. b 1 2020 -11 -27 b 2 b 1 And b 2 b 1 Or b 2 Nothing Nothing True Nothing False Nothing True True False True False Nothing False True False 46

Visual Basic 2010 기본 문법 2. 객체(폼, 컨트롤)의 속성값을 설정한다. 객체의 종류 객체 명 폼 Form 1 텍스트박스 Text. Box 1 레이블 Label 1 텍스트박스 Text. Box 2 레이블 Label 2 Text : = 레이블 Label 3 (Name) : lb. Result Border. Style : Fixed 3 D Text : 명령 버튼 Button 1 (Name) = btn. Cal Text : 산술연산실행 2020 -11 -27 속성 및 설정 값 Text : 산술연산 (Name) : txt. Oper 1 Text : 45 Text : / (Name) : txt. Oper 2 Text : 4 50

Visual Basic 2010 기본 문법 3. 코드 창을 열고, 코드(이벤트 프로시저)를 작성한다. Public Class Form 1 Private Sub btn. Cal_Click(By. Val sender As System. Object, By. Val e As System. Event. Args) Handles btn. Cal. Click Dim i. Num 1, i. Num 2 As Integer Dim s. Result As Double '변수의 정수형 선언 i. Num 1 = txt. Oper 1. Text i. Num 2 = txt. Oper 2. Text '텍스트 박스의 내용을 변수에 옮긴다 s. Result = i. Num 1 / i. Num 2 '두 변수를 나눈다 lbl. Result. Text = s. Result '나눗셈 결과 실수값을 레이블에 출력한다 End Sub End Class 2020 -11 -27 51

Visual Basic 2010 기본 문법 2. 객체(폼, 컨트롤)의 속성값을 설정한다. 객체의 종류 객체 명 폼 Form 1 텍스트박스 Text. Box 1 (Name) : txt. Input 1 레이블 Label 1 Text : 비교연산자 텍스트박스 Text. Box 2 (Name) : txt. Input 2 레이블 Label 3 Text : = (Name) : lbl. Result Text : 명령 버튼 Button 1 (Name) : btn. Gt Text : < 명령 버튼 Button 2 (Name) : btn. Ge Text : <= 명령 버튼 Button 3 (Name) : btn. Lt Text : > 명령 버튼 Button 4 (Name) : btn. Le Text : >= 명령 버튼 Button 5 (Name) : btn. Eq Text : = 명령 버튼 Button 6 (Name) : btn. Ne Text : <> 명령 버튼 Button 7 (Name) : btn. Like Text : Like 명령 버튼 Button 8 (Name) : btn. CEnd Text : 종료 2020 -11 -27 속성 및 설정 값 Text : 비교연산 Text : Border. Style = Fixed 3 D 57

Visual Basic 2010 기본 문법 3. Button 1을 더블 클릭하여 코드 창을 열고, 코드(이벤트 프로시저)를 작성한다. Private Sub btn. Gt_Click(By. Val sender As System. Object, By. Val e As System. Event. Args) Handles btn. Gt. Click Dim i. Num 1, i. Num 2 As Integer Dim x. Result As Boolean '변수의 정수형 선언 i. Num 1 = txt. Input 1. Text i. Num 2 = txt. Input 2. Text '텍스트 박스의 내용을 변수에 옮긴다 x. Result = i. Num 1 < i. Num 2 Label 1. Text = "<" '두 변수를 비교한다 '< 연산자 표시 lbl. Result. Text = x. Result 'Boolean 결과를 레이블에 출력한다 End Sub 2020 -11 -27 58

Visual Basic 2010 기본 문법 3. Button 2를 더블 클릭하여 코드 창을 열고, 코드(이벤트 프로시저)를 작성한다. Private Sub btn. Ge_Click(By. Val sender As System. Object, By. Val e As System. Event. Args) Handles btn. Ge. Click Dim i. Num 1, i. Num 2 As Integer Dim x. Result As Boolean '변수의 정수형 선언 i. Num 1 = txt. Input 1. Text i. Num 2 = txt. Input 2. Text '텍스트 박스의 내용을 변수에 옮긴다 x. Result = i. Num 1 <= i. Num 2 Label 1. Text = "<=" '두 변수를 비교한다 '<= 연산자 표시 lbl. Result. Text = x. Result 'Boolean 결과를 레이블에 출력한다 End Sub 2020 -11 -27 59

Visual Basic 2010 기본 문법 3. Button 3을 더블 클릭하여 코드 창을 열고, 코드(이벤트 프로시저)를 작성한다. Private Sub btn. Lt_Click(By. Val sender As System. Object, By. Val e As System. Event. Args) Handles btn. Lt. Click Dim i. Num 1, i. Num 2 As Integer '변수의 정수형 선언 Dim x. Result As Boolean i. Num 1 = txt. Input 1. Text i. Num 2 = txt. Input 2. Text '텍스트 박스의 내용을 변수에 옮긴다 x. Result = i. Num 1 > i. Num 2 Label 1. Text = ">" '두 변수를 비교한다 '> 연산자 표시 lbl. Result. Text = x. Result 'Boolean 결과를 레이블에 출력한다 End Sub 2020 -11 -27 60

Visual Basic 2010 기본 문법 3. Button 4를 더블 클릭하여 코드 창을 열고, 코드(이벤트 프로시저)를 작성한다. Private Sub btn. Le_Click(By. Val sender As System. Object, By. Val e As System. Event. Args) Handles btn. Le. Click Dim i. Num 1, i. Num 2 As Integer Dim x. Result As Boolean '변수의 정수형 선언 i. Num 1 = txt. Input 1. Text i. Num 2 = txt. Input 2. Text '텍스트 박스의 내용을 변수에 옮긴다 x. Result = i. Num 1 >= i. Num 2 Label 1. Text = ">=" '두 변수를 비교한다 '>= 연산자 표시 lbl. Result. Text = x. Result 'Boolean 결과를 레이블에 출력한다 End Sub 2020 -11 -27 61

Visual Basic 2010 기본 문법 3. Button 5를 더블 클릭하여 코드 창을 열고, 코드(이벤트 프로시저)를 작성한다. Private Sub btn. Eq_Click(By. Val sender As System. Object, By. Val e As System. Event. Args) Handles btn. Eq. Click Dim i. Num 1, i. Num 2 As Integer Dim x. Result As Boolean '변수의 정수형 선언 i. Num 1 = txt. Input 1. Text i. Num 2 = txt. Input 2. Text '텍스트 박스의 내용을 변수에 옮긴다 x. Result = i. Num 1 = i. Num 2 Label 1. Text = "=" '두 변수를 비교한다 '= 연산자 표시 lbl. Result. Text = x. Result 'Boolean 결과를 레이블에 출력한다 End Sub 2020 -11 -27 62

Visual Basic 2010 기본 문법 3. Button 6을 더블 클릭하여 코드 창을 열고, 코드(이벤트 프로시저)를 작성한다. Private Sub btn. Ne_Click(By. Val sender As System. Object, By. Val e As System. Event. Args) Handles btn. Ne. Click Dim i. Num 1, i. Num 2 As Integer Dim x. Result As Boolean '변수의 정수형 선언 i. Num 1 = txt. Input 1. Text i. Num 2 = txt. Input 2. Text '텍스트 박스의 내용을 변수에 옮긴다 x. Result = i. Num 1 <> i. Num 2 Label 1. Text = "<>" '두 변수를 비교한다 '<> 연산자 표시 lbl. Result. Text = x. Result 'Boolean 결과를 레이블에 출력한다 End Sub 2020 -11 -27 63

Visual Basic 2010 기본 문법 3. Button 7을 더블 클릭하여 코드 창을 열고, 코드(이벤트 프로시저)를 작성한다. Private Sub btn. Like_Click(By. Val sender As System. Object, By. Val e As System. Event. Args) Handles btn. Like. Click Dim x. Result As Boolean x. Result = txt. Input 1. Text Like txt. Input 2. Text '두 문자열을 비교한다 Label 1. Text = "Like" 'Like 연산자 표시 lbl. Result. Text = x. Result 'Boolean 결과를 레이블에 출력한다 End Sub Private Sub btn. End_Click(By. Val sender As System. Object, By. Val e As System. Event. Args) Handles btn. End. Click Me. Close() '프로그램 종료 End Sub 2020 -11 -27 64

Visual Basic 2010 기본 문법 3. 3 연산자 v 논리 연산자 Ø 참과 거짓을 판정하는 데 사용 연산자 의미 사용 예 Not 단항 연산자의 논리 NOT result = Not 10 < 20 ‘result=False And 논리 AND result = 10>20 And 10<20 ‘result=False Or 논리 OR result = 10>20 Or 10<20 ‘result=True Xor 논리 XOR result = 10>20 Xor 10<20 ‘result=True And. Also 논리 AND result = 10>20 And. Also 10<20 ‘result=False Or. Else 논리 OR result = 10>20 Or. Else 10<20 ‘result=True Ø 각 연산자의 논리적 의미 2020 -11 -27 66