Super basic procedural problems

ljeternity

I just learned VB, and I want the numbers in the two boxes to be equal to those in the third box. What is wrong, thank you. Wait online! !! !!
Private Sub Command1_Click ()
Dim s1%, s2%, s3%
Text3.Text = s3 = s2 + s1: Text1.Text = s1: Text2.Text = s2
End Sub

ljeternity

Come on! !! !!

iori90

1. It is recommended not to use ":"
2. The reward symbol is written in reverse, it should be
s1 = Text1.Text
s2 = Text2.Text
3. It seems you haven't understood the use of value-granting symbols
Text3.Text = s3 = s2 + s1
Is wrong, s3 is not needed at all
Correct writing
Text3.Text = s2 + s1
4.Text3.Text is a string type, and s1, s2 are integer types, so conversion is required.

amend as below
Private Sub Command1_Click ()
Dim s1%, s2%
s1 = cint (Text1.Text)
s2 = cint (Text2.Text)
Text3.Text = cstr (s2 + s1)
End Sub

aacc11

You should use the Val function to convert text to numbers before adding them

Text3.text = val (text1.text) + val (text2.text)