窗体上有一个名称为Command1的命令按钮，其单击事件过程如下： Private Sub Command1_Click() For i=3To1Step-1 Sum=0 For i=1Toi Sum=Sum+i*i Next Next Print Sum

admin2016-09-19 37

问题窗体上有一个名称为Command1的命令按钮，其单击事件过程如下：
Private Sub Command1_Click()
For i=3To1Step-1
Sum=0
For i=1Toi
Sum=Sum+i*i
Next
Next
Print Sum
End Sub
运行程序时，单击命令按钮，则窗体上显示的是

选项 A、1
B、6
C、18
D、25

答案A

解析本题是一个简单的二重循环，只要注意到i的值逐渐递减，而且在内循环执行之前都会重新将Sum的值设置为0，不难得出只会输出最后一次外循环的Sum值，由于此时i=1，所以内循环只会执行一次，最终输出1作为结果。

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

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

二级VB

NCRE全国计算机二级

相关试题推荐

以下用户自定义函数FunctionFunc(aAsInteger，bAsInteger)AsIntegerStaticmAsInteger．iAsInteger　m=0：i=2　i=i+m+i　
下列程序运行后的输出结果是FunctionFun(n)x=n*nFun=x一11EndFunctionPrivateSubCommand1_Click()Fork=1To2Y=Fun(k
在窗体上有一个文本框控件，名称为TextTime；--个计时器控件，名称为Timer1。要求每一秒在文本框中显示一次当前的时间。程序为：PrivateSubTimer1_______TxtTime.text=TimeEndS
在窗体上用复制、粘贴的方法建立了一个命令按钮数组，数组名为M1。设窗体Form1标题为“myform1”，双击控件数组中的第3个按钮，打开代码编辑器，写下如下代码：PrivaeSubM1_Click(IndexAsInteger)　
在窗体上添加一个按钮，名为Command1，然后编写如下的事件过程，输出结果为PrinvateSubComandl_Click()　　Fori=1To4　　　　x=4　　　　Forj=1To3　　　　
编写如下两个事件过程：PrivateSubForm_KeyDown(KeyCodeAsInteger，ShiftAsInteger)　PrintChr(KeyCode)EndSubPrivateSubFo
窗体、图片框或图像框中的图形通过对象的______属性设置。
下列程序运行时，若输入123，输入对话框的提示信息是______。PrivateSubCommand1_Click()X1=InputBox("请输入")　　MsgBox(X1)EndSub

随机试题

胃肠出血及肝、肾病首选
以下属于脾主运化功能的是
A．H--2’，H—6的化学位移为7．10～7．30(d)B．H—2’，H—6’的化学位移为7．20～7．50(d)C．H—2’，H—6’的化学位移为7．60～7．80(d)D．H—2’，H—6’的化学位移为7．70～7．90(d)E．H—2’，H
咨询工程师在合同管理中的作用包括()。
当初步设计达到一定深度，建筑结构比较明确时，编制建筑工程概算可采用()。
A公司拟增发普通股,每股发行价格20元,每股发行费用4元。预定第一年分派现金股利每股2元,以后每年股利增长3%,其资本成本为()。
在证券经纪业务中，证券公司收取全部佣金作为业务收入。()
法人也有肖像权。
AfamilydoctorchargedtheNightHomeService(NHS)morethan￡500,000insevenyearsfornightvisitsthathispatientsdidn
Forthispart,youareallowed30minutestowriteanessayonhowtobalanceworkandleisure.Youshouldwriteatleast150w

最新回复(0)

窗体上有一个名称为Command1的命令按钮，其单击事件过程如下： Private Sub Command1_Click() For i=3To1Step-1 Sum=0 For i=1Toi Sum=Sum+i*i Next Next Print Sum

二级VB

NCRE全国计算机二级

以下用户自定义函数FunctionFunc(aAsInteger，bAsInteger)AsIntegerStaticmAsInteger．iAsInteger m=0：i=2 i=i+m+i

下列程序运行后的输出结果是FunctionFun(n)x=n*nFun=x一11EndFunctionPrivateSubCommand1_Click()Fork=1To2Y=Fun(k

在窗体上有一个文本框控件，名称为TextTime；--个计时器控件，名称为Timer1。要求每一秒在文本框中显示一次当前的时间。程序为：PrivateSubTimer1_______TxtTime.text=TimeEndS

在窗体上用复制、粘贴的方法建立了一个命令按钮数组，数组名为M1。设窗体Form1标题为“myform1”，双击控件数组中的第3个按钮，打开代码编辑器，写下如下代码：PrivaeSubM1_Click(IndexAsInteger)

在窗体上添加一个按钮，名为Command1，然后编写如下的事件过程，输出结果为PrinvateSubComandl_Click() Fori=1To4 x=4 Forj=1To3

编写如下两个事件过程：PrivateSubForm_KeyDown(KeyCodeAsInteger，ShiftAsInteger) PrintChr(KeyCode)EndSubPrivateSubFo

窗体、图片框或图像框中的图形通过对象的______属性设置。

下列程序运行时，若输入123，输入对话框的提示信息是______。PrivateSubCommand1_Click()X1=InputBox("请输入") MsgBox(X1)EndSub

胃肠出血及肝、肾病首选

以下属于脾主运化功能的是

A．H--2’，H—6的化学位移为7．10～7．30(d)B．H—2’，H—6’的化学位移为7．20～7．50(d)C．H—2’，H—6’的化学位移为7．60～7．80(d)D．H—2’，H—6’的化学位移为7．70～7．90(d)E．H—2’，H

咨询工程师在合同管理中的作用包括()。

当初步设计达到一定深度，建筑结构比较明确时，编制建筑工程概算可采用()。

A公司拟增发普通股,每股发行价格20元,每股发行费用4元。预定第一年分派现金股利每股2元,以后每年股利增长3%,其资本成本为()。

在证券经纪业务中，证券公司收取全部佣金作为业务收入。()

法人也有肖像权。

AfamilydoctorchargedtheNightHomeService(NHS)morethan￡500,000insevenyearsfornightvisitsthathispatientsdidn

Forthispart,youareallowed30minutestowriteanessayonhowtobalanceworkandleisure.Youshouldwriteatleast150w

以下用户自定义函数FunctionFunc(aAsInteger，bAsInteger)AsIntegerStaticmAsInteger．iAsInteger　m=0：i=2　i=i+m+i　

在窗体上用复制、粘贴的方法建立了一个命令按钮数组，数组名为M1。设窗体Form1标题为“myform1”，双击控件数组中的第3个按钮，打开代码编辑器，写下如下代码：PrivaeSubM1_Click(IndexAsInteger)　

在窗体上添加一个按钮，名为Command1，然后编写如下的事件过程，输出结果为PrinvateSubComandl_Click()　　Fori=1To4　　　　x=4　　　　Forj=1To3　　　　

编写如下两个事件过程：PrivateSubForm_KeyDown(KeyCodeAsInteger，ShiftAsInteger)　PrintChr(KeyCode)EndSubPrivateSubFo

下列程序运行时，若输入123，输入对话框的提示信息是______。PrivateSubCommand1_Click()X1=InputBox("请输入")　　MsgBox(X1)EndSub