My Calculator

Please support our VB.NET advertiser: Intel Parallel Studio Home
Reply

Join Date: Dec 2008
Posts: 1
Reputation: Gwen203 is an unknown quantity at this point 
Solved Threads: 0
Gwen203 Gwen203 is offline Offline
Newbie Poster

My Calculator

 
0
  #1
Dec 3rd, 2008
I made a Calculator with 3 Textboxes (the First 2 for the Variables the Third for the Result) and 4 buttons (+, -, *, /) and the code i used for the subtraction button was:
  1. TextBox3.Text = Val(TextBox1.Text) - Val(TextBox2.Text)

But Heres all my Code:

Private Sub CloseToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CloseToolStripMenuItem.Click
'Closes Form
Me.Close()
End Sub

Private Sub AboutToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AboutToolStripMenuItem.Click
'Shows Form2 or the About Form
Form2.Show()
End Sub

Private Sub HelpToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles HelpToolStripMenuItem1.Click
'Shows Form3 or the Help Form
Form3.Show()
End Sub

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

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

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

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
'Divide Button
TextBox3.Text = Val(TextBox1.Text) / Val(TextBox2.Text)
End Sub
End Class
And i used 02 + 04 and i got it to = 6


Its not the most Advanced Calculator but I was board one day
Last edited by Gwen203; Dec 3rd, 2008 at 7:24 pm. Reason: Edit
Reply With Quote Quick reply to this message  
Join Date: Aug 2007
Posts: 160
Reputation: kb.net is an unknown quantity at this point 
Solved Threads: 26
kb.net's Avatar
kb.net kb.net is offline Offline
Junior Poster

Re: My Calculator

 
0
  #2
Dec 6th, 2008
Hi,

Not bad for a start but I have attached a full calc. code as a gift.
Attached Files
File Type: zip Forms.zip (29.0 KB, 6 views)
It is never about the number of languages you know, you either have the logic of programming or you don't ...

Some of the codes I post are collected from different sites during the past couple of years, so I would like to thank them for their help and for enabling me to help.
Reply With Quote Quick reply to this message  
Reply

This thread is more than three months old.
Perhaps start a new thread instead?
Message:


Thread Tools Search this Thread



About Us | Contact Us | Advertise | DaniWeb | Acceptable Use Policy | RSS Feed

©2003 - 2009 DaniWeb® LLC