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

在窗体上画一个命令按钮，其名称为Command1，然后编写如下代码：
OptionBase 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 T0 10
If Arr(k)>O Then
【1】
Else
【2】
End If
Next k
Print pos，neg
End Sub
以上程序的功能是，计算并输出数组Arr中10个数的正数之和pos与负数之和ne9，请填空。