首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,其名称为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
admin
2009-08-25
35
问题
在窗体上画一个命令按钮,其名称为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全国计算机二级
相关试题推荐
Swing中用来表示工具栏的类是javax.swing.______。
阅读下列程序片段Publicvoidtest(){Try{sayHello();system.out.println(“hello");}catch(ArrayIndexOutOfBoundExceptione){
程序如下:∥计算两个整数的乘法Java_1.javaimportjavax,swing.JOptionPane;publicclassJava_1{publicsta
能够用于创建可变字符串对象的类是______。
设二叉树如右:对该二叉树进行后序遍历的结果为______。
为了支持压栈线程与弹栈线程之间的交互与同步,在程序的下划线处依次填入的语句是()。publicclassIntStack{privateintidx=O;privateint[]data=newint[8];pub
下列Java语句从指定网址读取html文件,在下划线处应填上的选项是()。Readerin=new______(newURL(urlString).openStream());
在一棵二叉树上第5层的结点数最多是()。
软件测试的常用方法通常可分为白盒测试和【】。前者是根据程序的内部逻辑来设计测试用例,后者是根据软件的规格说明来设计测试用例。
一棵二叉树第八层(根结点为第一层)的结点数最多为【】个。
随机试题
四分位数间距主要用于()
不符合电击伤特点的是()
吸收
如图5.4—20所示的岩石边坡,开挖后发现坡体内有软弱夹层形成的滑面AC,倾角β=42°,滑面的内摩擦角φ=18°。滑体ABC处于临界稳定状态,其自重为450kN/m。若要使边坡的稳定安全系数达到1.5,每延米所加锚索的拉力P最接近下列哪个选项?(锚索下倾
2002年12月,大华汽车贸易公司与东方公司订立了一份汽车买卖合同。约定:大华汽车贸易公司于2003年2月向东方公司交付新汽车一辆,价款22万元,并约定由东方公司向大华汽车贸易公司付30%定金。合同订立10天内,东方公司依约向大华汽车贸易公司付定金6600
首次公开发行公司在发行前,必须以( )的方式,向投资者进行公司推介。
陈某向王某购买货物,价款为10万元,合同签订后,陈某向王某支付了2万元作为定金。交货期限届满后,因为第三方供货迟延,致使王某只向陈某交付了一半的货物,陈某因此主张适用定金罚则,要求王某承担定金责任,王某不同意。下列关于是否适用定金罚则的表述中,符合合同法律
3名医生和6名护士被分配到3所学校为学生体检,每校分配1名医生和2名护士,不同的分配方法共有()种.
OnSeptember7,2001,a68-year-oldwomaninStrasbourg,France,hadhergallbladder(胆囊)removedbysurgeonsoperating,viacomp
PublicViewsontheAnti-TerrorismAct(Canada)A)ThisreportispartoftheongoingeffortsundertakenbytheResearchandSt
最新回复
(
0
)