[Help] text1 + label1

I have a code, were if i click on a command button, the result should be

text1 + label1 = 150

but it become text1 + label1 = 10050

here are the code

Code:

Private Sub Command1_Click()
Text1 = Text1.Text + Label1.Caption
End Sub

*NB!: i have tested text1.text + label1.caption etc.

 

The problem is because you are adding 2 strings together. You need to convert them to numbers first.

Code:

 Text1 = CDbl(Text1.Text) + CDbl(Label1.Caption)

 

Thank you VERY much, it worked

 

You should always define the property of the output area as well, it just makes things more neat. So instead of Text1 = , you'd have Text1.Text = .