设有以下程序： 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

admin2015-08-28 66

问题设有以下程序：
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

解析程序的作用是输入的数如果是5的倍数就累加，如果不是就每次加50或与上次是5的倍数的那个数相累加。因此最终a的值是15＋15＋35＋35＝100。

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

本试题收录于：二级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

二级VB

NCRE全国计算机二级

在一个容量为32的循环队列中，若头指针front=3，尾指针rear=2，则该循环队列中共有______个元素。

树是结点的集合，它的根结点的数目是()。

当一个工程含有多个窗体时，其中的启动窗体是______。

下列可以打开立即窗口的操作是______。

下列不属于软件调试技术的是______。

使用CommonDialog控件的()方法，可显示“打印”对话框。

表达式"12345"＜＞"12345"&"ABC"的值是______。

下列()标识符不能作为VisualBasic的变量名。

在窗体上建立—个名称为Text1的文本框，用来接收一个整数。当form1_Click事件发生时，将在窗体上显示输入整数的各位数字和。PrivateFunctionfun(mAsInteger)AsIntegerDimkAsInte

各种运算符间的优先顺序从高到低是

胎儿完成内旋转动作是指

下列哪些情形属于想象竞合犯?()

空气吹扫氧气管道应注意的事项有(　　)。

根据《关于建立金融期货投资者适当性制度的规定》，自然人投资者应当全面评估自身的()，审慎决定是否参与金融期货交易。[2015年5月真题]

分层教学是因材施教原则的具体应用。()

警察随着()的产生而产生。

少先队员去植树。如果每人种5棵，还有3棵没人种；如果其中2人各种4棵，其余的人各种6棵，这些树苗正好种完。问一共种多少棵树苗？

已知r(A)=r1，且方程组AX=α有解，r(B)=r2，且BY=β无解，设A=[α1，α2，…，αn]，B=[β1，β2，…，βn]，且r[α1，α2，…，αn，β1，β2，…，βn，β]=r，则()．

在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：PrivateSubCommand1_Click()DimiAsInteger,xAsIntegerFori=1To6

AmericansandTheirCarsA)Ithasbeenoneoftheworld’smostenduringandpassionateloveaffairs:Americansandtheircars.I

设有以下程序： 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

二级VB

NCRE全国计算机二级

在一个容量为32的循环队列中，若头指针front=3，尾指针rear=2，则该循环队列中共有______个元素。

树是结点的集合，它的根结点的数目是()。

当一个工程含有多个窗体时，其中的启动窗体是______。

下列可以打开立即窗口的操作是______。

下列不属于软件调试技术的是______。

使用CommonDialog控件的()方法，可显示“打印”对话框。

表达式"12345"＜＞"12345"&"ABC"的值是______。

下列()标识符不能作为VisualBasic的变量名。

在窗体上建立—个名称为Text1的文本框，用来接收一个整数。当form1_Click事件发生时，将在窗体上显示输入整数的各位数字和。PrivateFunctionfun(mAsInteger)AsIntegerDimkAsInte

各种运算符间的优先顺序从高到低是

胎儿完成内旋转动作是指

下列哪些情形属于想象竞合犯?()

空气吹扫氧气管道应注意的事项有( )。

根据《关于建立金融期货投资者适当性制度的规定》，自然人投资者应当全面评估自身的()，审慎决定是否参与金融期货交易。[2015年5月真题]

分层教学是因材施教原则的具体应用。()

警察随着()的产生而产生。

少先队员去植树。如果每人种5棵，还有3棵没人种；如果其中2人各种4棵，其余的人各种6棵，这些树苗正好种完。问一共种多少棵树苗？

已知r(A)=r1，且方程组AX=α有解，r(B)=r2，且BY=β无解，设A=[α1，α2，…，αn]，B=[β1，β2，…，βn]，且r[α1，α2，…，αn，β1，β2，…，βn，β]=r，则()．

在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：PrivateSubCommand1_Click()DimiAsInteger,xAsIntegerFori=1To6

AmericansandTheirCarsA)Ithasbeenoneoftheworld’smostenduringandpassionateloveaffairs:Americansandtheircars.I

设有以下程序： 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

空气吹扫氧气管道应注意的事项有(　　)。