How sum 2 textbox ?

[Paul282]

Try this

Private Sub Command1_Click()

    Dim txt1 As Single
    Dim txt2 As Single
    
    txt1 = CSng(Text1.Text)
    txt2 = CSng(Text2.Text)
    
    Label1.Caption = Str(txt1 + txt2)

End Sub

...and have a good weekend...