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

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

Option Base 1

Private Sub Command1_ Click()

Dim Arr

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

pos = 0

neg = 0

For k = 1 To 10

If Art(k) ＞ 0 Then

Else

End If

Next k

Print pos, neg

End Sub

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