#4 사칙연산
http://www.yes24.com/Product/Goods/84909299?Acode=101
이제 연산자에 대해 학습해 본다. 그 첫 번째로 가장 기본이 되는 사칙연산에 대해 살펴본다. 사칙연산은 다 아는 바와 같이 더하기, 빼기, 곱하기 그리고 나누기를 기본으로 한다. 추가적으로 나머지를 구하는 연산자를 포함해서 학습한다.
Sub F04-01()
Dim OPR_01, OPR_02 As Integer
OPR_01 = Worksheets(“Sheet1”).Cells(2, 1).Value
OPR_02 = Worksheets(“Sheet1”).Cells(2, 2).Value
Worksheets(“Sheet1”).Cells(3, 1).Value = OPR_01 + OPR_02
Worksheets(“Sheet1”).Cells(3, 2).Value = OPR_01 - OPR_02
Worksheets(“Sheet1”).Cells(3, 3).Value = OPR_01 * OPR_02
Worksheets(“Sheet1”).Cells(3, 4).Value = OPR_01 / OPR_02
End Sub
OPR_01, OPR_02 두 개의 변수를 숫자형 변수로 선언했다. 이와 같이 동일한 데이터 형식의 변수는 묶어서 함께 선언할 수 있다. 다음으로 선언된 두 변수에 Sheet1의 셀 2행 1열과 2행 2열에 입력된 값을 담는다. 그리고 변수에 담긴 두 값은 각각 사칙연산을 수행하고 그 결과를 셀 3행 1열부터 4열까지 차례로 출력한 것이다.
Sub F04-02()
Dim OPR_01, OPR_02 As Integer ‘입력 변수
Dim OUTPUT_01, OUTPUT_02, OUTPUT_03, OUTPUT_04 As Integer ‘출력 변수
OPR_01 = Worksheets(“Sheet1”).Cells(2, 1).Value
OPR_02 = Worksheets(“Sheet1”).Cells(2, 2).Value
OUTPUT_01 = OPR_01 + OPR_02
OUTPUT_02 = OPR_01 - OPR_02
OUTPUT_03 = OPR_01 * OPR_02
OUTPUT_04 = OPR_01 / OPR_02
Worksheets(“Sheet1”).Cells(3, 1).Value = OUTPUT_01
Worksheets(“Sheet1”).Cells(3, 2).Value = OUTPUT_02
Worksheets(“Sheet1”).Cells(3, 3).Value = OUTPUT_03
Worksheets(“Sheet1”).Cells(3, 4).Value = OUTPUT_04
End Sub
결과를 저장할 변수 4개를 추가하고 해당 변수를 각각의 셀에 출력하면 된다. 그리고 각 코드마다 주석을 달아주는 방법은 설명 앞에 작은따옴표를 입력하면 된다.
입력, 출력, 결과 처리 등 모든 내용은 되도록 변수에 담는 훈련을 하는 것이 좋다. 이유는 모든 것을 변수에 담게 되면 바로 반복적인 사용이 가능하다는 이점이 있기 때문이다.
다음으로 사칙연산 외, 나머지를 구하는 연산자에 대해 학습한다. ‘왜 나머지를 구하는 연산자를 알아야 하지?’라고 반문할 수 있는데, 나머지를 구하는 연산자는 대단히 중요하다.
자투리 연산자라고 부르기도 하는데 그 활용도가 매우 높다. 특히 특정 묶음을 처리할 때는 매우 유용한 연산자가 된다. 예를 들어 3일에 한 번씩 알람이 울리는 시계를 프로그래밍한다고 가정해보자. 그러면 우리는 매일의 날짜를 3으로 나누고 그 나머지가 0일 때 알람을 울리도록 프로그래밍할 수 있다. 이런 경우 지금 학습할 자투리 연산자가 그 역할을 담당하게 되는 것이다.
Sub F04_03()
Dim OPR_01, OPR_02 As Integer ‘입력 변수
Dim OUTPUT_01 As Integer ‘출력 변수
OPR_01 = Worksheets(“Sheet1”).Cells(2, 1).Value
OPR_02 = Worksheets(“Sheet1”).Cells(2, 2).Value
OUTPUT_01 = OPR_01 Mod OPR_02
Worksheets(“Sheet1”).Cells(3, 1).Value = OUTPUT_01
End Sub
기존 사칙연산과 같이 Mod라는 연산자를 이용하는 것이다. MOD 연산자의 이용 방법은 연산하고자 하는 두 수의 중간에 삽입하여 처리하면 된다.
