hesap makinesi

[tamerr89]

hesap makinesi

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim a As Integer, b As Integer
a = TextBox1.Text
b = TextBox2.Text
MsgBox("İki sayının toplamı" & " " & a + b)

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim a As Integer, b As Integer
a = TextBox1.Text
b = TextBox2.Text
MsgBox("İki sayının farkı" & " " & a - b)

End Sub

Private Sub Button3_Click(ByVal sender A System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Dim a As Integer, b As Integer
a = TextBox1.Text
b = TextBox2.Text
MsgBox("İki sayının çarpımı" & " " & a * b)

End Sub

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
Dim a As Integer, b As Integer
a = TextBox1.Text
b = TextBox2.Text
MsgBox("İki sayının bölümü" & " " & a / b)

End Sub
end class