[인서울] VB 6.0 덧셈,뺄셈,곱셈, 나누셈 4칙연산 계산기

[워드프레스(wordpress)]

Private Sub Command1_Click()

 Dim 왼쪽변수, 오른쪽변수 As Integer

 왼쪽변수 = Val(Text1.Text)
 오른쪽변수 = Val(Text2.Text)

Label2.Caption = 왼쪽변수 + 오른쪽변수

End Sub

Private Sub Command2_Click()

 Dim 왼쪽변수, 오른쪽변수 As Integer

 왼쪽변수 = Val(Text3(0).Text)
 오른쪽변수 = Val(Text3(1).Text)

Label3.Caption = 왼쪽변수 - 오른쪽변수

End Sub

Private Sub Command3_Click()

 Dim 왼쪽변수, 오른쪽변수 As Integer

 왼쪽변수 = Val(Text3(2).Text)
 오른쪽변수 = Val(Text3(3).Text)

Label4.Caption = 왼쪽변수 * 오른쪽변수

End Sub

Private Sub Command4_Click()

 Dim 왼쪽변수, 오른쪽변수 As Integer

 왼쪽변수 = Val(Text3(4).Text)
 오른쪽변수 = Val(Text3(5).Text)

Label5.Caption = 왼쪽변수 / 오른쪽변수

End Sub

[nomercy(175.223)]

인풋을 하나로 만들어서 산술 계산식을 만들어보셈. 다항 계산도 가능하게! 이건 윈도우 계산기도 안되는거

[워드프레스(wordpress)]

넵 바로 함!