当前位置:IT认证>BASIC题库

问题:[填空题]

[填空题] 在窗体上画一个命令按钮,其名称为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 (8) Else (9) End If Next k Print pos, neg End Sub 以上程序的功能是,

  

参考答案:

pos=pos+Arr(k)

  参考解析

微信端