在窗体上画一个命令按钮，其名称为Commandl，然后编写如下代码： Option Babe 1 Private Sub Commandl_Click() Dim Arr Art=Array(43，68，-25，65，-78，12，-79，43，-94，7

admin2009-08-25 38

问题在窗体上画一个命令按钮，其名称为Commandl，然后编写如下代码：
Option Babe 1
Private Sub Commandl_Click()
Dim Arr
Art=Array(43，68，-25，65，-78，12，-79，43，-94，72)
pos*0
neg=0
For k=1 To 10
IfArt(k)>0 Then
【】
Else
【】
End If
Next k
Print pos，neg
End Sub
以上程序的功能是，计算并输出数组Arr中10个数的正数之和pos与负数之和neg，请填空。

选项

答案pos=pos+Air(k),neg=neg+Air(k)

解析根据题意，如果取出来的是正数，则加到pos上；如果是负数，则加到neg上。

转载请注明原文地址:https://jikaoti.com/ti/0oq0FFFM

本试题收录于：二级VB题库NCRE全国计算机二级分类