Creating a .exe

[ShawnjohnSJ]

I've made an equals button which has made the calculator work, but I've only made work for +. How do I make it work for all 4 +-*/

That depends on how you coded the function for the equals button. Let me see the code.

[sm321]

That depends on how you coded the function for the equals button. Let me see the code.

Label2.Text = "+"
Label1.Text = Val(TextBox1.Text) + Val(TextBox2.Text)

I just copied and pasted the + button's coding

[ShawnjohnSJ]

Label2.Text = "+"
Label1.Text = Val(TextBox1.Text) + Val(TextBox2.Text)

I just copied and pasted the + button's coding

You won't be able to do it that way. I can't give you example code because I haven't programmed in Visual Basic in years, but if you look at the YouTube video I posted 2 posts ago, it'll show you how to correctly do it.

[ShawnjohnSJ]

I've made an equals button which has made the calculator work, but I've only made work for +. How do I make it work for all 4 +-*/

Well you would have to recode some of your program to make it work for an equals button.. the only reason it works for addition is because you're basically performing the addition twice.

Give me a few minutes and I'll try to write up some code that'll have an equals button.

Edit: Try this code.. I don't know if it works because I don't have visual basic installed but it should work. It will only work for 2 numbers. Make sure your equals button is named "Button5"

Dim firstValue as Double

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

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

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
firstValue = Val(TextBox1.Text)
Label2.Text = "x"
End Sub

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

Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
Label2.Text = "="
Label1.Text = firstValue / Val(TextBox2.Text)
End Sub

[sm321]

Well you would have to recode some of your program to make it work for an equals button.. the only reason it works for addition is because you're basically performing the addition twice.

Give me a few minutes and I'll try to write up some code that'll have an equals button.

Edit: Try this code.. I don't know if it works because I don't have visual basic installed but it should work. It will only work for 2 numbers. Make sure your equals button is named "Button5"

Dim firstValue as Double

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

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

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
firstValue = Val(TextBox1.Text)
Label2.Text = "x"
End Sub

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

Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
Label2.Text = "="
Label1.Text = firstValue / Val(TextBox2.Text)
End Sub

Thanks, I'll try that sometime But I've encountered another problem, I've got this code:
Val(TextBox2.Text) = Val(TextBox5.Text) - Val(TextBox4.Text) * Val(TextBox6.Text)

Yet it says 'Expression is a value and therefore cannot be the target of an assignment'.

[ShawnjohnSJ]

Thanks, I'll try that sometime But I've encountered another problem, I've got this code:
Val(TextBox2.Text) = Val(TextBox5.Text) - Val(TextBox4.Text) * Val(TextBox6.Text)

Yet it says 'Expression is a value and therefore cannot be the target of an assignment'.

TextBox2.Text is a variable. When you do Val(TextBox2.Text) it converts that string into an integer (hence Val=Value).. what you're doing here is setting the integer value of TextBox2.Text to ... which doesn't make any sense.

To put that into simpler terms, only use Val after the equals sign.

TextBox2.Text = Val(TextBox5.Text) - Val(TextBox4.Text) * Val(TextBox6.Text)

[sm321]

TextBox2.Text is a variable. When you do Val(TextBox2.Text) it converts that string into an integer (hence Val=Value).. what you're doing here is setting the integer value of TextBox2.Text to ... which doesn't make any sense.

To put that into simpler terms, only use Val after the equals sign.

TextBox2.Text = Val(TextBox5.Text) - Val(TextBox4.Text) * Val(TextBox6.Text)

It hasn't come up with an error, yet text box 2 is still blank

[ShawnjohnSJ]

It hasn't come up with an error, yet text box 2 is still blank

Send me your code via PM and I'll help you.

[Rezozo]

I agree with Wizzup?, he is a B O S S btw.
If you want to learn any programming, start with basic or pascal!

[n3ss3s]

It may be easy for beginners, but if you begin with stuff like that you'll most of the time never get much further than a beginner... No offense intended.

Yes, and considering actual VB coding rather than messing with the form designer, it's syntax and ideas are very, very different from the "leading" languages (which future languages are based on).

[ShawnjohnSJ]

Yes, and considering actual VB coding rather than messing with the form designer, it's syntax and ideas are very, very different from the "leading" languages (which future languages are based on).

True, the syntax is very different and the idea of event-driven programming gets you into a completely different mindset than if you were programming in C++, Java, etc. What I meant by it being a good language for starters is not having to mess around with creating the code for GUI's (which can be daunting sometimes) and easy manipulation of components on the GUI. Its very easy for someone to jump right in and create a calculator (for example) and learn about variables, expressions, methods, etc. But everyone has different opinions and preferences, I guess its just a matter of where you feel comfortable starting off at.

[Daniel]

It may be easy for beginners, but if you begin with stuff like that you'll most of the time never get much further than a beginner... No offense intended.

BASIC was really just designed to teach the use of types, control structures, and the like, in a nice easy manner. I agree that it is good for learning, but disagree to constantly use it for everything.

[sm321]

I've had a little practice with it and want to make a Runescape Calculator of some sort, but what should I make?

[Daniel]

I've had a little practice with it and want to make a Runescape Calculator of some sort, but what should I make?

RuneScape calculator?

[Richard]

BASIC was really just designed to teach the use of types, control structures, and the like, in a nice easy manner. I agree that it is good for learning, but disagree to constantly use it for everything.

To be fair, Pascal was designed as a language for learning, and it's by the far the most used language on this forum. Even Java is used largely as a method of teaching people the ways of OOP, although it is used in some large applications today.

[sm321]

RuneScape calculator?

One that calculates something for Runescape e.g. type in your xp and it tells you time to get a level or something Runescape related.