VB6 - Basics 1 - Dim what?

[Rian]

[spoiler]Private Sub cmdAdd_Click()
Dim A As Double
Dim B As Double
Dim Result As Double

' Assign the textbox input to our variables
A = Str(txtVal1.Text)
B = Str(txtVal2.Text)

' Add our varibles together
Result = A + B

' Display the result
lblResult.Caption = Str(Result)
End Sub[/spoiler]