Public Class Form1
Dim s1, s2,işlem As Integer
Private Sub buton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
s1 = TextBox1.Text
s2 = TextBox2.Text
işlem = s1 + s2
MsgBox("toplama işleminin sonucu " & işlem)
End Sub
Private Sub buton2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
s1 = TextBox1.Text
s2 = TextBox2.Text
işlem = s1 - s2
MsgBox("çıkarma işleminin sonucu " & işlem)
End Sub
Private Sub buton3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
s1 = TextBox1.Text
s2 = TextBox2.Text
işlem = s1 * s2
MsgBox("çarpma işleminin sonucu " & işlem)
End Sub
Private Sub buton4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
s1 = TextBox1.Text
s2 = TextBox2.Text
işlem = s1 + s2
MsgBox("bölme işleminin sonucu " & işlem)
End Sub