首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下事件过程: Private Sub Form_Click() x=0 Whilex10 x=x+1 x=x*x Wend Print x End Sub 运行程序,单击窗体,输出结果是
设有如下事件过程: Private Sub Form_Click() x=0 Whilex10 x=x+1 x=x*x Wend Print x End Sub 运行程序,单击窗体,输出结果是
admin
2020-01-02
22
问题
设有如下事件过程:
Private Sub Form_Click()
x=0
Whilex10
x=x+1
x=x*x
Wend
Print x
End Sub
运行程序,单击窗体,输出结果是
选项
A、16
B、19
C、20
D、25
答案
D
解析
While…Wend语句只要指定的条件为True,则会重复执行一系列的语句。程序中只要满足x<10的条件循环就一直执行。当x=4时,执行完循环体内容后x=25,条件为False,退出,打印。选D。
转载请注明原文地址:https://kaotiyun.com/show/MnTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大于2的偶数,并单击“分解为”按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数有时
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画出包含三个命令按钮的控件数组,名称为cmdl,下标分别为0、1、2,Caption分别为“开始”、“停止”和“退出”,如图3(a)所示
窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下:PrivateSubText1_KeyUp(KeyCodeAsInteger,ShiftAsInteger)DimcAsStri
编写如下程序:PrivateSubCommandl_Click()DimxAsInteger,yAsIntegerx=InputBox(”输入第一个数”):y=InputBox(”输入第二个数”)C
设窗体文件中有下面的事件过程:PrivateSubCommand1_Click()Dims:a%=100:PrintaEndSub其中变量a和s的数据类型分别是
假定一个VisualBasic应用程序由一个窗体模块和一个标准模块构成。为了保存该应用程序,以下正确的操作是
某人编写了下面的程序,希望能把Text1文本框中的内容写到Temp.txt文件中PrivateSubCommand1_Click()Open"Telnp.txt"ForOutputAs#2Print"Text1"
将E-R图转换到关系模式时,实体与联系都可以表示成()。
在结构化方法中,用数据流程图(DFD)作为描述工具的软件开发阶段是()。
随机试题
设f(x),g(x)在区间[-a,a](a>0)上连续,g(x)为偶函数,且f(x)满足条件f(x)+f(-x)=A(A为常数)。利用(1)结论计算定积分|sinx|arctanexdx.
下列驱虫药中,性味苦寒有毒的是()。
环丙沙星的化学结构是
男性,27岁,不慎从高处坠落,造成骨盆环3处骨折,伴多个脏器损伤,入院后出现烦躁、面色苍白、脉搏加快、少尿等表现。行尿道修补术后,尿管留置时间应为约
新生儿缺氧缺血性脑病时,控制惊厥首选的药物是()。
在建设项目环境影响评价中,工程分析的重点是( )。
甲公司职工张某在工作中因先天性心脏病突发住院治疗3个月,住院期间甲公司按月向其支付病假工资。出院后,张某回公司上班。因该疾病导致活动受限,张某已不能从事原工作。公司又为其另行安排了其它工作岗位,但张某仍不能从事该工作。甲公司拟单方面解除与张某之间尚未到期的
(2014年上海财经大学)现在股价62.5元,买入6个月欧式看涨期权,允许以65元的执行价格买入100股。期权费200元,到期涨到75元,则净利润为()元。
WhenSpanishfootballclubBarcelonapaidUS$35millionforRonaldinholastsummer,theyweren’tbuyingaprettyface."Iam【C1】
Acommonassumptionabouttheprivatesectorofeducationisthatitcatersonlytotheelite.【C1】______,recentresearchpoints
最新回复
(
0
)