Share VB 2010 "Operator Aritmatika"

kali ini, listing yang dibuat adalah listing yang berkaitan dengan operator aritmatika.
operator aritmatika yakni operator yang digunakan dalam perhitungan matematis. misalnya adalah +, -, *, /, MOD, dll.
program dan listing yang berkaitan dengan operator aritmatika.

gambar tampilan program saat dijalankan

cat : MOD adalah sisa pembagian antara 2 bilangan.

untuk listingnya adalah sebagai berikut :

Public Class Form1

    Private Sub Button5_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button5.Click
        TextBox3.Text = (Val(TextBox1.Text) + Val(TextBox2.Text)) / 2
    End Sub

    Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        TextBox3.Text = Val(TextBox1.Text) + Val(TextBox2.Text)
    End Sub

    Private Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click
        TextBox3.Text = Val(TextBox1.Text) - Val(TextBox2.Text)
    End Sub

    Private Sub Button3_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button3.Click
        TextBox3.Text = Val(TextBox1.Text) * Val(TextBox2.Text)
    End Sub

    Private Sub Button4_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button4.Click
        TextBox3.Text = Val(TextBox1.Text) / Val(TextBox2.Text)
    End Sub

    Private Sub Button6_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button6.Click
        TextBox3.Text = Val(TextBox1.Text) Mod Val(TextBox2.Text)
    End Sub

    Private Sub Button7_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button7.Click
        Close()
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub
End Class

demikian program perhitungan sederhana ini,,,,

http://pensilketikku.blogspot.com/

semoga bermanfaat,,,,

dI_