[填空题] 在窗体上画一个命令按钮，其名称为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 10If Art(k) ＞ 0 ThenElseEnd If Next k Print pos, neg End Sub以上程_考试资料记录