首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下列程序段的执行结果为( )。 x=Int(Rnd+3) Select Case x Case 5 Print"A Row" Case 4 Print"B Row" Case 3 Print"C Row" Case Else
下列程序段的执行结果为( )。 x=Int(Rnd+3) Select Case x Case 5 Print"A Row" Case 4 Print"B Row" Case 3 Print"C Row" Case Else
admin
2020-02-27
57
问题
下列程序段的执行结果为( )。
x=Int(Rnd+3)
Select Case x
Case 5
Print"A Row"
Case 4
Print"B Row"
Case 3
Print"C Row"
Case Else
Print"D Row"
End Select
选项
A、A Row
B、B Row
C、C Row
D、D Row
答案
C
解析
本题考查Select语句的执行。Rnd产生(0,1)范围内的数,Int()函数取不大于参数的最小整数,因此x的值总为4。Select Case语句的功能是在各个Case分支中寻找x的位置,找到则执行该分支的语句,执行完毕退出Select Case语句。
转载请注明原文地址:https://www.kaotiyun.com/show/tjTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=10y=20Callfun1(x,y)Printx:yEndSubPrivateFunctionf
为了在Form_Load事件过程中用Print方法在窗体上输出指定的内容,首先应执行的操作是()。
为了实现对象的自动拖放,应该设置该对象的一个属性。下面设置中正确的是()。
设窗体上有一个名称为Check1的复选框,并有下面程序代码:PrivateSubCheck1_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAssingle)Check1.V
(1)在考生文件夹下有一个工程史件sjt3.vbp,包含了所有控件和部分程序。程序运行时,在文本框中每输入一个字符,则立即判断:若是小写字母,则将它的大写形式显示在标签Label1中;若是大写字母,则把它的小写形式显示在Label1中,若是其他字符,则将该
(1)在名称为Form1、标题为“标签”的窗体上添加一个名称为Label1的标签.并设置适当属性以满足以下要求:①标签的标题为“计算机等级考试”;②标签可根据标题内容自动调整其大小;③标签带有边框,且标签标题显示为三号字。
(1)请在名称为Form1的窗体上添加一个名称为H1的水平滚动条,并在属性窗口中设置它的属性值,使其满足下列要求:它的最小刻度值为1。最大刻度值为100,在程序运行时,用鼠标单击滚动条上滚动框以外的区域(不包括两边按钮),滚动框移动10个刻度。再在滚动条下
设窗体上有3个图像框:Image1、Image2、Image3,并有下面的程序代码:PrivateSubForm_Load()Image1.Picture=LoadPicture("LEAF.bmp")Image2.Pictu
下列打开“代码窗口”的操作中错误的是()。
窗体上有一个名称为HScroll1的滚动条,程序运行后,当单击滚动条两端的箭头时,立即在窗体上显示滚动框的位置(即刻度值)。下面能够实现上述操作的事件过程是
随机试题
根据我国《劳动法》等相关法律法规,下列关于工资支付的说法中,错误的是()
细胞水肿高血压
建设社会主义新农村的基本思路包括()
下列不属于前台业务系统的功能的是()。
委托加工应纳消费税物资(非金银首饰)收回后直接对外销售的应税消费品,其由受托方代扣代缴的消费税,应计入()科目。
在某公司清算中,公司财产只有30万元,则应优先偿付的费用是()。
在温度和压强不变时,1LNO2高温分解[2NO2(g)2NO(g)+O2(g)],达到平衡时体积变为1.3L,这时NO2的转化率为()。
大きい波が来るときほかの人は怖がったが、田中さんは沖のほうを眺めていた。
KurtVonnegut’sSlaughterhouseFiveisatypical______novel.
ThecultureoftheUnitedStatesisaWesterncultureoriginallyinfluencedbyEuropeancultures.Ithasbeendevelopedsincelo
最新回复
(
0
)