有如下程序： 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 　　Next j 　　p＝p * s Next i P

admin2020-02-27 30

问题有如下程序：
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
　　Next j
　　p＝p * s
Next i
Print p
End Sub
程序运行后，单击窗体，则输出结果是(　　)。

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

答案D

解析

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

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

二级VB

NCRE全国计算机二级

相关试题推荐

VB中，若没有显式声明变量的数据类型，则默认的类型是()。
利用通用对话框控件打开字体对话框的操作是()。
为了暂时关闭计时器，应把它的一个属性设置为False，这个属性是()。
为了实现对象的自动拖放，应该设置该对象的一个属性。下面设置中正确的是()。
命令按钮Command1的MouseUp事件过程结构如下：PrivateSubCommand1_MouseUp(ButtonAsInteger，ShiftAsInteger，XAsSingle，YAsSingle)EndSub则
(1)在考生文件夹下有一个工程文件sjt3．vbp，在Form1的窗体中有一个文本框、一个计时器和两个命令按钮。程序的功能是在运行时，单击“开始计数”按钮，就开始计数(如图所示)，每隔1秒，文本框中的数加1；单击“停止计数”按钮，则停止计数。要求：修改适当
(1)在考生文件夹下有一个工程文件sjt3．vbp，窗体中有两个图片框，名称分别为P1、P2，其中的图片内容分别是一架航天飞机和一朵云彩，一个命令按钮，名称为C1．命题为“发射”，还有一个计时器，名称为Timerl。并给出了两个事件过程，但并不完整，试求：
在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序：PrivateSubForm_Load()　　Show　　Text1.Text＝""　　Text2.Text＝""　　Text1.SetFocusEndS
为达到把a、b中的值交换后输出的目的，某人编程如下：PrivateSubCommand1_Click()a％＝10：b％＝20Callswap(a，b)Printa,bEndSubPr
软件测试的目的是

随机试题

简述劳动安全卫生立法的作用。
下列表述中，说法不正确的是哪一项?()
我国《民法通则》中规定，机关法人是一种民事主体，其基本特征包括()。
通过发展小城镇来容纳农村的富余劳动力,是我国城镇化的一个重要特征。加快小城镇建设的三个有利于是指()。(1)有利于转移农村富余劳动力,促进农业产业化、现代化(2)有利于促进乡镇企业和农村人口相对集中改善生活质量,加快城镇化进程(3)有利于启动民
内河航道炸礁工程，施工单位与业主签订合同后，办理了应办的各种手续，如期开工，施工过程中，发生了主机功率2400kW的炸礁船被误入施工区的1000t运输船碰撞事件，炸礁船直接损失80万元，炸礁施工完成后，进行水下地形、水文测量、绘制了竣工水深图，图巾显示，炸
在选定文件或文件夹之后，下列操作可以删除文件或文件夹的有()。
C市决定在2019年年终工作总结中增加“向人民汇报、请人民阅卷”环节。要求各级各部门在政府平台上展示2019年工作情况，让人民品评。该市的做法（）。
药检局对5种抗菌素进行了药效比较，得到结果如下：甲药比乙药有效，丙药的毒副作用比丁药大，戊药的药效最差，乙药与己药的药效相同。由此可知(　)。
A．OGTTB．GHbAlcC．血脂检查D．监测血糖男性，48岁。体检发现空腹血糖6.9mmol／L，无明显口干、多尿，应做哪项检查
OnecountrythatiscertainoftheeffectoffilmsontourismisAustralia.TheTouristOfficeofQueenslandsaythatCrocodile

最新回复(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 Next j p＝p * s Next i P

二级VB

NCRE全国计算机二级

VB中，若没有显式声明变量的数据类型，则默认的类型是()。

利用通用对话框控件打开字体对话框的操作是()。

为了暂时关闭计时器，应把它的一个属性设置为False，这个属性是()。

为了实现对象的自动拖放，应该设置该对象的一个属性。下面设置中正确的是()。

命令按钮Command1的MouseUp事件过程结构如下：PrivateSubCommand1_MouseUp(ButtonAsInteger，ShiftAsInteger，XAsSingle，YAsSingle)EndSub则

在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序：PrivateSubForm_Load() Show Text1.Text＝"" Text2.Text＝"" Text1.SetFocusEndS

为达到把a、b中的值交换后输出的目的，某人编程如下：PrivateSubCommand1_Click()a％＝10：b％＝20Callswap(a，b)Printa,bEndSubPr

软件测试的目的是

简述劳动安全卫生立法的作用。

下列表述中，说法不正确的是哪一项?()

我国《民法通则》中规定，机关法人是一种民事主体，其基本特征包括()。

在选定文件或文件夹之后，下列操作可以删除文件或文件夹的有()。

C市决定在2019年年终工作总结中增加“向人民汇报、请人民阅卷”环节。要求各级各部门在政府平台上展示2019年工作情况，让人民品评。该市的做法（）。

药检局对5种抗菌素进行了药效比较，得到结果如下：甲药比乙药有效，丙药的毒副作用比丁药大，戊药的药效最差，乙药与己药的药效相同。由此可知( )。

A．OGTTB．GHbAlcC．血脂检查D．监测血糖男性，48岁。体检发现空腹血糖6.9mmol／L，无明显口干、多尿，应做哪项检查

OnecountrythatiscertainoftheeffectoffilmsontourismisAustralia.TheTouristOfficeofQueenslandsaythatCrocodile

有如下程序： 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 　　Next j 　　p＝p * s Next i P

在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序：PrivateSubForm_Load()　　Show　　Text1.Text＝""　　Text2.Text＝""　　Text1.SetFocusEndS

药检局对5种抗菌素进行了药效比较，得到结果如下：甲药比乙药有效，丙药的毒副作用比丁药大，戊药的药效最差，乙药与己药的药效相同。由此可知(　)。