Calculating text boxes in VB6

[Wernerh]

Hi guys,

I must be the dumb one in these posts. I have 2 simple (2 everyone else out there) questions. I have just started using vb. I am able to use vb in excel with no problem and can code accordingly. I have tried to use the same code in vb6, but obviously it has shown me a big no no! I have read through the threads for the last 2 days, but cannot find these simple answers.

Q1: Simple adding to text boxes together in the form and returning answer in a third box. Using a command button to calculate.

Here is my code:

Private Sub Command1_Click()
Dim Text123 As Integer
Var1 = CDec(Text62.Text)
Var2 = CDec(Text63.Text)
Var3 = CDec(Text64.Text)
var4 = CDec(Text65.Text)
Text123.Text = (Var1 + Var2 + Var3 + var4)
End Sub


Returns : "Invalid qualifier"

Second Q: I have a text box on form 1 and on form 2 - Want to have vb automatically place the result form form 1 (textbox1) to form 2 (textbox1) This result is the calculated result from the previous question. What is this code.

Thanks for anyone whom can help.
Werner

[pureenhanoi]

Hi guys,

I must be the dumb one in these posts. I have 2 simple (2 everyone else out there) questions. I have just started using vb. I am able to use vb in excel with no problem and can code accordingly. I have tried to use the same code in vb6, but obviously it has shown me a big no no! I have read through the threads for the last 2 days, but cannot find these simple answers.

Q1: Simple adding to text boxes together in the form and returning answer in a third box. Using a command button to calculate.

Here is my code:

Private Sub Command1_Click()
Dim Text123 As Integer
Var1 = CDec(Text62.Text)
Var2 = CDec(Text63.Text)
Var3 = CDec(Text64.Text)
var4 = CDec(Text65.Text)
Text123.Text = (Var1 + Var2 + Var3 + var4)
End Sub


Returns : "Invalid qualifier"

Second Q: I have a text box on form 1 and on form 2 - Want to have vb automatically place the result form form 1 (textbox1) to form 2 (textbox1) This result is the calculated result from the previous question. What is this code.

Thanks for anyone whom can help.
Werner

+ The first Q, Text123 is a variable, not an object. So, u cannot write :
Text123.Text = anything
If u already have a textbox named Text123, so remove line
Dim Text123 As Integer.
If u havenot already a textbox named Text123, nearly end line must be that
Text123 = (var1+var2+...)
+ The second Q, this is very simple. Insert following line before End Sub line:
From2.TextBox1 = Text123

[Wernerh]

Hi Pureenhanoi

You are a star ! Thanks that worked perfectly.

Cheers
Werner