有如下程序： Private Sub Form_Click() Dim s As Integer，p As Integer p=1 For i=1 To 4 For j=1 To i s=s+j Nextj p=p*s

admin2019-06-11 25

问题有如下程序：
Private Sub Form_Click()
  Dim s As Integer，p As Integer
  p=1
  For i=1 To 4
  For j=1 To i
   s=s+j
  Nextj
p=p*s
  Next i
  Print P
End Sub
程序运行后，单击窗体，则输出结果是

选项 A、90
B、180
C、400
D、800

答案D

解析本题是一个二重循环，而且内循环次数根据外循环的循环变量而定。内循环完成累加，内循环结束后将累加和乘到p中保存起来。在4次外循环中分别累乘的是1、4、10、20。

转载请注明原文地址:https://kaotiyun.com/show/CCUp777K

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

二级VB

NCRE全国计算机二级

相关试题推荐

以下说法中正确的是()。
针对VisualBasic的菜单设计操作，下面叙述中错误的是()。
一个栈的初始状态为空。现将元素1、2、3、4、5、A、B、c、D、E依次入栈，然后再依次出栈，则元素出栈的顺序是()。
窗体上有1个名称为Command1的命令按钮，事件过程及函数过程如下：PrivateSubCommand1_Click()DimpAsIntegerp=m(1)+m(2)+m(3)PrintPE
窗体上有1个名称为Command1的命令按钮，事件过程如下：PrivateSubCommand1_Click()Dimx％，y％，z％x=InputBox("请输入第1个整数")y=InputBox("请输入第
运行如下程序：PrivateSubCommand1_Click()Dima(5，5)AsIntegerFori=1To5Forj=1To4a(i，j)=i*2+jIfa(i，j)
在软件设计中不使用的工具是()。
满足下列条件之一的年份是闰年：1)年份能被4整除但不能被100整除2)年份能被400整除若y代表年份，下面判断闰年的正确表达式是()。
表达式4+5＼6*7／8Mod9的值是()。
假定有如下程序：PrivateSubForm_Click()Dima(4)AsInteger，b(4)AsIntegerFork=0To2a(k+1)=Val(InputBox("请输入一个整数："))b(3-k)=a(k+1)Ne

随机试题

预防马巴贝斯虫病采取的主要措施是()
施工测量工作时必须遵守()的原则。
《城镇道路工程施工与验收规范》规定，城市道路结构工程沥青料面层施工质量检测项目是()等。
存、贷款期限内，不管市场利率水平如何变化，借贷双方仍然执行合同规定的利率，这种利率属于()。
E公司生产、销售一种产品，该产品的单位变动成本是60元，单位售价是80元。公司目前采用30天按发票金额付款的信用政策，80％的顾客(按销售量计算，下同)能在信用期内付款，另外20％的顾客平均在信用期满后20天付款，逾期应收账款的收回需要支出占逾期账款5％的
论述配送中心的运作技术。
刑罚执行的专门监督机关是()。
材料一马道村是一个典型的传统农耕村落。千百年来，这里的村民以种地务农为生，主要的经济作物有槟榔、荔枝、菠萝蜜和水稻等。于飞7岁那年，父亲复员，带着他和母亲回到马道村。如诗画般美丽的田园风光，亲近自然、充满乐趣的乡村生活，以及热情淳朴的乡邻们，都给童年
Whatisthewoman’smajor?
SusanSontag(1933—2004)wasoneofthemostnoticeablefiguresintheworldofliterature.Formorethan40yearsshemadeitm

最新回复(0)

有如下程序： Private Sub Form_Click() Dim s As Integer，p As Integer p=1 For i=1 To 4 For j=1 To i s=s+j Nextj p=p*s

二级VB

NCRE全国计算机二级

以下说法中正确的是()。

针对VisualBasic的菜单设计操作，下面叙述中错误的是()。

一个栈的初始状态为空。现将元素1、2、3、4、5、A、B、c、D、E依次入栈，然后再依次出栈，则元素出栈的顺序是()。

窗体上有1个名称为Command1的命令按钮，事件过程及函数过程如下：PrivateSubCommand1_Click()DimpAsIntegerp=m(1)+m(2)+m(3)PrintPE

窗体上有1个名称为Command1的命令按钮，事件过程如下：PrivateSubCommand1_Click()Dimx％，y％，z％x=InputBox("请输入第1个整数")y=InputBox("请输入第

运行如下程序：PrivateSubCommand1_Click()Dima(5，5)AsIntegerFori=1To5Forj=1To4a(i，j)=i*2+jIfa(i，j)

在软件设计中不使用的工具是()。

满足下列条件之一的年份是闰年：1)年份能被4整除但不能被100整除2)年份能被400整除若y代表年份，下面判断闰年的正确表达式是()。

表达式4+5＼6*7／8Mod9的值是()。

假定有如下程序：PrivateSubForm_Click()Dima(4)AsInteger，b(4)AsIntegerFork=0To2a(k+1)=Val(InputBox("请输入一个整数："))b(3-k)=a(k+1)Ne

预防马巴贝斯虫病采取的主要措施是()

施工测量工作时必须遵守()的原则。

《城镇道路工程施工与验收规范》规定，城市道路结构工程沥青料面层施工质量检测项目是()等。

存、贷款期限内，不管市场利率水平如何变化，借贷双方仍然执行合同规定的利率，这种利率属于()。

论述配送中心的运作技术。

刑罚执行的专门监督机关是()。

Whatisthewoman’smajor?

SusanSontag(1933—2004)wasoneofthemostnoticeablefiguresintheworldofliterature.Formorethan40yearsshemadeitm