阅读下面事件过程,写出执行结果。Private Sub Command1_Click()Dim a%, b%, c%, s%, w%, t%a =
阅读下面事件过程,写出执行结果。
Private Sub Command1_Click()
Dim a%, b%, c%, s%, w%, t%
a = -1: b = 3: c = 3
s = 0: w = 0: t = 0
If c > 0 Then s = a + b
If a <= 0 Then
If c <= 0 Then
w = a - b
End If
Else
If c > 0 Then w = a - b Else t = c
End If
c = a + b
Print a, b, c
Print s, w, t
End Sub