首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面程序代码: Private Sub Command1_Click()i=1 Do While i<5 j=1 Do j=i+1 Print"*"; Loop Until i+j>10 Print i=i+2 Loop End Sub 程序运行时输出字
有下面程序代码: Private Sub Command1_Click()i=1 Do While i<5 j=1 Do j=i+1 Print"*"; Loop Until i+j>10 Print i=i+2 Loop End Sub 程序运行时输出字
admin
2016-09-19
63
问题
有下面程序代码:
Private Sub Command1_Click()i=1
Do While i<5
j=1
Do j=i+1
Print"*";
Loop Until i+j>10
Print i=i+2
Loop
End Sub
程序运行时输出字符“*”的个数是
选项
A、50
B、20
C、16
D、15
答案
C
解析
本题是一个二重循环,最终求星号的个数,实际上就是计算内循环总共执行了多少次。i=1的时候内循环执行9次,i=3的时候内循环执行7次,i=5的时候跳出循环,内循环共执行了16次。
转载请注明原文地址:https://kaotiyun.com/show/FOLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:DimSWAsBooleanFunctionfunc(XAsInteger)AsInteger IfX<20Then Y=X
在窗体上有一个文本框控件,名称为TextTime;--个计时器控件,名称为Timer1。要求每一秒在文本框中显示一次当前的时间。程序为:PrivateSubTimer1_______TxtTime.text=TimeEndS
在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然后编写如下事件过程:PrivateSubForm_Load() List1.AddItem"Item1" List1.AddItem"It
编写如下两个事件过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger) PrintChr(KeyCode)EndSubPrivateSubFo
窗体、图片框或图像框中的图形通过对象的______属性设置。
面程序的功能是找出能够被13、23、43除余数分别为1、2、3的最小的两位正整数。请填空。PrivateSubForm_Click() DimiAsInteger,jAsInteger j=0 j=43
在窗体上画一个名称为“Command1”的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click() DimaAsString a="123456789" Fori=1To5
下列程序运行时,若输入123,输入对话框的提示信息是______。PrivateSubCommand1_Click()X1=InputBox("请输入") MsgBox(X1)EndSub
随机试题
下列选项中,用户可以使用的合法的IP地址是_________。
用于发汗、治疗无汗时合谷常配
施工资料预验收由监理单位组织,建设单位、施工单位项目负责人及档案员参加,城建档案机构负责审验。()
与活塞式压缩机相比,透平式压缩机的显著特点为()。
下列关于融资融券业务所涉及证券权益处理的说法中,正确的是()。Ⅰ.证券公司行使对证券发行人的权利,应当事先征求客户的意见,并按照其意见办理Ⅱ.证券登记结算机构受证券发行人委托以现金形式分派投资收益的,应当将分派的资金划人证券公司信用交易证券交
某企业出售—台设备(不考虑相关税费),原价160000元,已提折旧45000元,出售设备时发生各种清理费用3000元,出售设备所得价款113000元。该设备出售净收益为()元。
试述幼小衔接工作中应注意的问题。
运动员水平越高,竞技越激烈,心理素质对比赛结果的影响相对就越大。
法律面前人人平等观念是在近代资产阶级革命过程中首先提出的。而社会主义制度为实现法律面前人人平等的理想奠定了现实的经济、政治和文化基础,法律面前人人平等观念不仅被社会主义法治所承认,而且得到充分体现,成为社会主义法治的基本原则。法律面前人人平等包括
Weareaserioussellerandlookingforwardto(build)______longandreliablebusinessrelationswiththoseseriousbuyers.
最新回复
(
0
)