[填空题] 在窗体上画一个命令按钮，其名称为Command1，然后编写如下代码： Option Base 1 Private Sub Command1_Cl

[填空题] 在窗体上画一个命令按钮，其名称为Command1，然后编写如下代码：

Option Base 1

Private Sub Command1_Click()

Dim Arr

Arr=Array(43,68,-25,65,-78,12,-79,43,-94,72)

pos=0

neg=0

For k=1 To 10

If Arr(k)＞0 Then

______

Else

______ End If

Next k

Print pos,neg

End Sub

以上程序的功能是计算并输出数组Arr中10个数的正数之和pos与负数之和neg，请填空。

pos=pos十Arr(k)(或pos=Arr(k)+pos)neg=neg-Arr(k)(或neg=Arr(k)+neg

本题中，当数组元素的值为正数(即大干0)时，应将其值累加到变量pos，故第一个空处语句应为pos=pos+Arr(k)。当数组元素的值为负数(即小于0)时，应将其值累加到变量neg，故第二个空处语句应为neg=neg+Art(k)。