Rumus kalkulator di microsoft visual basic

Kalian pasti sudah tahu tentang microsoft visual basic kan. Diantara fungsinya ada yang berguna untuk membuat kalkulator. Disamping caranya mudah dan mudah dipahami namun butuh ketelitian dalam pengerjaannya. banyak yang tidak tahu kalau microsoft visual basic bisa digunakan untuk membuat kalkulator. Di sini saya akan mengajari rumus-rumusnya saja , setelah itu kalian pelajari sendiri ok...
Berikut Rumus - rumusnya :

# Rumus membuat angkanya :
- Angka 1 = Text1.Text = Text1.Text & 1
- Angka 2 = Text1.Text = Text1.Text & 2
- Angka 3 = Text1.Text = Text1.Text & 3
- Angka 4 = Text1.Text = Text1.Text & 4
- Angka 5 = Text1.Text = Text1.Text & 5
- Angka 6 = Text1.Text = Text1.Text & 6
- Angka 7 = Text1.Text = Text1.Text & 7
- Angka 8 = Text1.Text = Text1.Text & 8
- Angka 9 = Text1.Text = Text1.Text & 9
- Angka 0 = Text1.Text = Text1.Text & 0

# Rumus penjumlahan ( + ) :
num = Text1.Text
Text1.Text = ""
op = "+"

# Rumus pengurangan ( - ) :
num = Text1.Text
Text1.Text = ""
op = "-"

# Rumus perkalian ( x ) :
num = Text1.Text
Text1.Text = ""
op = "*"

# Rumus pembagian ( / ) :
num = Text1.Text
Text1.Text = ""
op = "/"

# Rumus sama dengan ( = ) :
num2 = Text1.Text
If op = "+" Then
Text1.Text = num1 + num2
ElseIf op = "/" Then
Text1.Text = num1 / num2
ElseIf op = "-" Then
Text1.Text = num1 - num2
ElseIf op = "*" Then
Text1.Text = num1 * num2
End If

# Rumus penghapusan atau del :
Text1.Text = ""


Semoga rumus diatas bermanfaat bagi anda yang membutuhkan, dan moga berhasil dalam mencobanya.
terima kasih