Dim a, b, c As Integer a = -3 b = -2 c = 0 Call s1(a, b, c) Text1.Text = Str(c) End Sub
Dim a, b, c As Integer a = -3 b = -2 c = 0 Call s1(a, b, c) Text1.Text = Str(c) End Sub
日期：2013-06-18 19:52:05 人气：2
代码不完全吧
Dim a, b, c As Integer a = -3 b = -2 c = 0 Call s1(a, b, c) Text1.Text = Str(c) End Sub