Private Sub Command1_Click() Text3.Text = Val(Text1.Text) + Val(Text2.Text)End Sub
文本框的值是文本类型，想要相加必须先转换成数值类型。
Text3.text=val(Text1.text)+val(Text2.text)
楼上正解
