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

[填空题] 在窗体上画一个命令按钮，其名称为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

(11)

Else

(12)

End If

Next k

Print pos,neg

End Sub

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

(11)pos=pos+arr(k) (12)neg=neg+arr(k)

本题中实际是对数据进行累加求和。存储累加和的变量分别为pos和neg，累加的分量为数组arr的元素值，在If…Else…End If语句中判断元素值的大小，根据题目要求正数累加到pos变量中，负数累加到neg变量中，所以答案为“pos=pos+arr(k)”和“neg=neg+arr(k)”。