This is the simple code of calculator:-
Public Class Form2
Dim total1 As Integer
Dim total2 As Integer
Dim sign As String
Dim opr As String
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TextBox1.Text = TextBox1.Text & "0"
End Sub