Hesap Makinesi – Visual Basic.Net ( Kod )

.Net’e yeni başlayanlar için basit bir hesap makinesi uygulaması örneği..

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