How to make a Calculator in the SECRET VB 6 0

CODE:

Private Sub CommandButton1_Click()
'Times
Dim a
a = TextBox1.Text * TextBox2.Text
MsgBox a, vbInformation, "Calculator"
End Sub
Private Sub CommandButton2_Click()
'Devide
Dim a
a = TextBox1.Text / TextBox2.Text
MsgBox a, vbInformation, "Calculator"
End Sub
Private Sub CommandButton4_Click()
'Subtract
MsgBox TextBox1.Text - TextBox2.Text, vbInformation, "Calculator"
End Sub

Category:

Education

Tags:

• How
• to
• make
• a
• Calculator
• in
• the
• SECRET
• VB
• 6
• 0