首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读程序: Private Sub Form_Click() X=50 For i=1 To 4 Y=InputBox("请输入一个整数") y=Val(y) If v Mod 5=0 Then a=
admin
2016-08-24
38
问题
阅读程序:
Private Sub Form_Click()
X=50
For i=1 To 4
Y=InputBox("请输入一个整数")
y=Val(y)
If v 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/viLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设在窗体上有个文本框,然后编写如下的事件过程:PrivateSubText1_KeyDown(KeyCodeAsInteger,ShiftAsInteger) ConstAlt=4 ConstKey_F2=&H71
对已在窗体中控件的操作不正确的是()。
在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然后编写如下事件过程:PrivateSubForm_Load0 List1.AddItem"Item1" List1.AddItem"Item2"
下面程序段执行结果为()。x=Int(Rnd()+4)SelectCasex Case5 Print"excellent" Case4 Print"good" Case3
下面说法不正确的是
在窗体上有一个文本框控件,名称为TextTime;--个计时器控件,名称为Timer1。要求每一秒在文本框中显示一次当前的时间。程序为:PrivateSubTimer1_______() TxtTime.text=TimeE
以下程序的功能是:将一维数组A中的100个元素分别赋给二维数组B的每个元素并打印出来,要求把A(1)到A(10)依次赋给B(1,1)到B(1,10),把A(11)到A(20)依次赋给B(2,1)到B(2,10),……,把A(91)到A(100)依次赋给B(
鼠标移动经过控件时,将触发控件的()事件。
为了在运行时能显示窗体左上角的控制框(系统菜单),可以设置以下哪个属性的值为True()。
表达式Int(8*Sqr(36)*10^(.2)^10+0.5)/10的值是()。
随机试题
人耳听觉范围(可闻声)是
乳剂由于分散相和连续相的比重不同,造成上浮或下沉的现象为
张某在风景区旅游,见一失恋女子欲跳崖自杀。张某赶忙救助,她明确拒绝高喊到:“让我去死,不要管我。”张某不听,强行将女子送到医院,为其支付医疗费l000元。在助过程中,自己的相机和女子的钱包都不慎遗落。下列关于本案说法正确酌是:()
中国山东某公司于2003年6月14日收到甲国某公司来电称:“设备3560台,每台270美元CIF青岛,7月甲国港装船,不可撤销即期信用证支付,2003年6月22日前复到有效。”中国山东公司于2003年6月17日复电:“若单价为240美元CIF青岛,可接受3
某公司30岁以下的年轻员工中有一部分报名参加了公司在周末举办的外语培训班。该公司的部门经理一致同意在本周末开展野外拓展训练。所有报名参加外语培训班的员工都反对在本周末开展拓展训练。由此可以推出()。
商店换季大甩卖,某种上衣价格下降60%.(1)原来买2件的钱,现在可以买5件(2)原来的价格是现在价格的2.5倍
SoBig.Fdamagedcomputerprogramsmainlyby______.ComparedwithSoBig.F,Blasterwasavirusthatwas______.
设顺序表的长度为n。下列排序方法中,最坏情况下比较次数小于n(n-1)/2的是()
Whatistheweatherperfectfor?
AccordingtoMr.Bacon.peoplekeepsnakesbecause
最新回复
(
0
)