设有以下程序： Private Sub Form Click() X=50 For i=1 To 4 Y=InputBox("请输入一个整数") y=Val(y) If y Mod 5=0 Then a=a+y x=y Else a=a

admin2015-05-29 19

问题设有以下程序：
Private Sub Form Click()
X=50
For i=1 To 4
Y=InputBox("请输入一个整数")
y=Val(y)
If y Mod 5=0 Then
a=a+y
x=y
Else
a=a+x
End If
Next i
Print a
End Sub
程序运行后，单击窗体，在输入对话框中依次输入15、24、35、46，输出结果为

选项 A、100
B、50
C、120
D、70

答案A

解析本题考查的考点是有关循环的。本题需要写出每一次循环的变量变化情况。第一次循环时输入15，If判断为真，所以a=15，x=15；第二次循环时输入24，If判断为假，所以a=15+15=30，x仍然为15；第三次循环时输入35，If判断为真，所以a=30+35=65，x=35：第四次循环时输入46，If判断为假，所以a=65+35=100，x=35。

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

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

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

设有以下程序： Private Sub Form Click() X=50 For i=1 To 4 Y=InputBox("请输入一个整数") y=Val(y) If y Mod 5=0 Then a=a+y x=y Else a=a

二级VB

NCRE全国计算机二级

执行以下Command1的Click事件过程在窗体上显示OptionBase1PrivateSubCommand1Click()Dimaa=Array("a"，"b"，"C"，"d"，"e"，

设有如下的记录类型：TypeStudentnumberAsStringnameAsStringageAsIntegerEndType则正确引用该记录类型变量的代码是

以下关于菜单的叙述中，错误的是

以下叙述中错误的是

若要求从文本框中输入密码时在文本框中只显示“*”号，则应当在此文本框的属性窗口中设置

计时器控件能有规律的以一定时间间隔触发______事件，并执行该事件过程中的程序代码。

通用对话框中打开“颜色对话框”的方法是()。

在一个窗体上添加一命令按钮控件，名为Command1，事件过程如下，则执行结果是()。OptionBase1PrivateSubCommand1_Click()Dima(5)AsIntegerDimk

年休假

脑震荡最有诊断价值的表现是

为预防厌氧菌感染，冲洗伤口宜选择的药液为

质量事故的处理过程包括事故调查及事故原因分析和()。

下列机构可以存银行间债券市场进行债券发行、交易和回购的有()。

某股票在2007年1～12月每月的平均价格时间序列属于(　　)。

年末未分配利润等于企业当年实现的税后利润加未分配利润年初数。()

在SQLSELECT语句中，用于实现关系的选择运算的短语是()。

WhichofthefollowingisthereasonforSilvioBerlusconi’sanger?

A、ThemanshouldonlywatchTVinthedaytime.B、Themanshouldn’twatchTVanymore.C、Themanshouldspendmoretimeonhiss

设有以下程序： Private Sub Form Click() X=50 For i=1 To 4 Y=InputBox("请输入一个整数") y=Val(y) If y Mod 5=0 Then a=a+y x=y Else a=a

二级VB

NCRE全国计算机二级

执行以下Command1的Click事件过程在窗体上显示OptionBase1PrivateSubCommand1Click()Dimaa=Array("a"，"b"，"C"，"d"，"e"，

设有如下的记录类型：TypeStudentnumberAsStringnameAsStringageAsIntegerEndType则正确引用该记录类型变量的代码是

以下关于菜单的叙述中，错误的是

以下叙述中错误的是

若要求从文本框中输入密码时在文本框中只显示“*”号，则应当在此文本框的属性窗口中设置

计时器控件能有规律的以一定时间间隔触发______事件，并执行该事件过程中的程序代码。

通用对话框中打开“颜色对话框”的方法是()。

在一个窗体上添加一命令按钮控件，名为Command1，事件过程如下，则执行结果是()。OptionBase1PrivateSubCommand1_Click()Dima(5)AsIntegerDimk

年休假

脑震荡最有诊断价值的表现是

为预防厌氧菌感染，冲洗伤口宜选择的药液为

质量事故的处理过程包括事故调查及事故原因分析和()。

下列机构可以存银行间债券市场进行债券发行、交易和回购的有()。

某股票在2007年1～12月每月的平均价格时间序列属于( )。

年末未分配利润等于企业当年实现的税后利润加未分配利润年初数。()

在SQLSELECT语句中，用于实现关系的选择运算的短语是()。

WhichofthefollowingisthereasonforSilvioBerlusconi’sanger?

A、ThemanshouldonlywatchTVinthedaytime.B、Themanshouldn’twatchTVanymore.C、Themanshouldspendmoretimeonhiss

某股票在2007年1～12月每月的平均价格时间序列属于(　　)。