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

在窗体上画一个命令按钮，其名称为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  39
问题 在窗体上画一个命令按钮，其名称为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://kaotiyun.com/show/p01p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)