1,453
社区成员
发帖
与我相关
我的任务
分享Dim a, b, c As Single
Private Sub Form_Load()
Text1.Text = ""
Text2.Text = ""
a = Val(Text1.Text)
b = Val(Text2.Text)
End Sub
Private Sub T01()
c = a + b
End Sub
Private Sub Command1_Click()
Call T01
Text3.Text = c
End Sub

