填空题 在窗体上画一个命令按钮,其名称为Command1,然后编写如下代码: Option Base 1 Private Sub Command1_Click() Dim Art 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+Art(k) , neg=neg+Arr(k)
【答案解析】根据题意,如果取出来的是正数,则加到pos上;如果是负数,则加到neg上。