首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下程序: Private Sub Form_Click( ) Dim S As Integer,p As Integer p=1 For i=1 T0 4 For j=1 To i
有如下程序: Private Sub Form_Click( ) Dim S As Integer,p As Integer p=1 For i=1 T0 4 For j=1 To i
admin
2020-08-10
59
问题
有如下程序:
Private Sub Form_Click( )
Dim S As Integer,p As Integer
p=1
For i=1 T0 4
For j=1 To i
s=s+j
Next j
p=p * s
Next i
Print p
End Sub
程序运行后,单击窗体,则输出结果是( )。
选项
A、90
B、180
C、400
D、800
答案
D
解析
程序是一个双层For循环,外层循环变量的值决定内层For循环的次数。
当i=1时,内层循环1次,s=1,p=1;
当i=2时,内层循环2次,s=1+1+2=4,p=1*4=4;
当i=3时,内层循环3次,s=4+1+2+3=10,p=4*10=40;
当i=4时,内层循环4次,s=10+1+2+3+4=20,p=40*20=800。
转载请注明原文地址:https://www.kaotiyun.com/show/2qHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了使文本框显示滚动条,除要设置ScrollBars外,还必须设置的属性是
在窗体上画一个组合框,一个命令按钮和一个文本框,其名称分别为Combol,Commandl和Textl,然后编写如下事件过程:PrivateSubForm_Load()Combol.AddItern”AAAAA”:Com
有如下函数:Functionfun(aAsInteger,nAsInteger)ASIntegerDimmAsIntegerWhilea>=na=a-n:m=m+1Wend
下列关于栈叙述正确的是
设有如下程序段:Dima(10)ForEachxInaPrintx;Nextx在上面的程序段中,变量x必须是
在利用菜单编辑器设计菜单时,为了把组合键“Alt+X”设置为“退出(X)”菜单项的访问键,可以将该菜单项的标题设置为
在窗体上画一个名称为Command1的命令按钮,再画两个名称分别为Label1、Label2的标签,然后编写如下程序代码:PrivateXAsIntegerPrivateSubCommand1_Click()X=5:Y=3Callpro
在菜单编辑器中建立如下图所示的菜单,并为每个菜单项编写了鼠标单击事件过程。关于此菜单,以下叙述中错误的是()。
下列关于栈的叙述正确的是
下面关于VB数据文件的叙述中错误的是
随机试题
男性,61岁,高血压病史8年,冠心病史4年,近1周来胸骨后疼痛程度加重,次数增频,持续时间延长来门诊。测血压24.4/15.9kPa(184/120mmHg),ECG示以R波为主的导联T波低平或倒置,心肌酶谱正常。为预防心肌梗死发生,下列处理哪项不恰当
有利血栓形成瘀点
男性,45岁,肝炎病史20余年,近2个月来出现右侧季肋部持续胀痛,伴厌食、乏力和腹胀。查体:右侧肋缘下可触及肿大的肝,质地坚硬,边缘不规则;AFP>1000μg/L。有确定诊断意义的检查是
贴现银行需要资金时持未到期的票据向其他银行办理贴现的行为称为( )。
一端为固定铰支座,另一端为可动铰支座的单梁是( )。
会员制期货交易所的会员都是交易所的创办发起人。( )
凤凰女子彭荆风山峦、树林、村庄全被白茫茫的浓雾遮没了,我们的汽车穿行于雾中,只隐约听见鸡的啼声、河水搅动水车的吱嘎响声,还有洗衣少妇时缓时急的捣衣声和轻柔的笑语声,她们笑得那样甜而开朗,我仿佛见到了一群“白脸长身见人善作媚笑的女子”,赤着脚站在清澈冰凉
甲乙夫妇2人有1子1女,其子丙娶妻丁,生子戊,其女己嫁至邻村,甲死后遗产有房屋3间,对于甲的遗产无权参与继承的是()。
某体育代表队在一次比赛中共获A、B、C、D等4个项目的奖牌若干枚。其中,A项目奖牌数大于C、D两项目奖牌数之和,C项目奖牌数大于D项目奖牌数,并且,在D项目上至少获得两枚奖牌,在B项目上至少获得一枚奖牌。据此,可以推出该队在此次比赛中共获奖牌数至
A、Howspeakerscanmisunderstandtheaudience.B、Howspeakerscanwinapprovalfromtheaudience.C、Howlistenersindifferentc
最新回复
(
0
)