首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
运行下列程序时,输出的结果是( )。 Private Sub Form_Click() Dim x x=Array(”Software”,”and”,”Hardware”,”System”) For
运行下列程序时,输出的结果是( )。 Private Sub Form_Click() Dim x x=Array(”Software”,”and”,”Hardware”,”System”) For
admin
2019-03-14
71
问题
运行下列程序时,输出的结果是( )。
Private Sub Form_Click()
Dim x
x=Array(”Software”,”and”,”Hardware”,”System”)
For i=LBound(x,1)To UBound(x,1)
If Left(x(i),1)=”S”Then Print x(i);
Next i
End Sub
选项
A、Software
B、SoftwareSystem
C、出错信息
D、SoftwareandHardwareSystem
答案
B
解析
本题考查变体类型。变体类型变量可通过Array函数来存放多个元素,做为数组进行处理。要读取数组上界时,可使用UBound(x)来实现,要读取数组下界时,LBound(x)来实现。因为题中x存放了多个字符串,i表示第一个字符串的行下标的下界,UBound(x,1)表示第一个字符串的行下标的上界。利用Left函数取得每一行数组元素的最左边的字符,然后判断是否为“S”,如果是,则输出该元素。
转载请注明原文地址:https://kaotiyun.com/show/9BUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下能够触发文本框Change事件的操作是
有如下的一个函数过程:Functionfn(ByValnumAsLong)DimkAsLongk=1:hum=Abs(num)DoWhilesumk=k*(numMod10)num=hum\10Loopfn=kEnd
窗体上有1个名为Listl的列表框,其中已经输入了若干个项目(如图3所示);还有2个文本框,名称分别为Text1、Text2,1个名称为Commandl的命令按钮,并有以下程序:PrivateSubCommandlClick()Dimstr
以下事件过程的功能是:从已存在于磁盘上的顺序文件Numl.txt中读取数据,计算读出数据的平方值,将该数据及其平方值存入新的顺序文件Num2.txt中。则在以下横线处合适的语句是()。PrivateSubFormClick()Dim
下列关于通用对话框CDl的叙述中,错误的是()。
在名称为Forml的窗体上画一个名称为Imagel的图像框,其高、宽分别为2000、3000,且不随图片大小而变化;再画两个命令按钮,标题分别是“显示图片”和“隐藏图片”,名称分别为Cmdl、Cmd2,如图5所示。需编写两个命令按钮的Click事件过程,使
如果一个顶级菜单项的访问键为D,则以下等同于单击该菜单项的操作为
有下面程序代码:PrivateSubCommandl_Click()DimxAsInteger,sAsIntegerx=1Fork=1To3x=x+1:procx:s=s+xNextkPrintsEndSu
对长度为n的线性表进行顺序查找,在最坏情况下所需要的比较次数为
在表达式2+3*4^5-Sin(x+1)/2中,首先进行的运算是()。
随机试题
下列属于全球化特点的是()
Thealarmonourhouseholdcomputerterminalringsandwakesmeup.Myhusbandsimplystirsandgoesbacktosleep.Itransfert
属沉淀反应的常用检测方法是
参与临床研究的单位及人员应当熟悉和了解
适用于环形开挖法预留核心土的隧道围岩条件是()。
根据《会计法》的规定,下列经济业务事项中,应当办理会计手续,进行会计核算的有()。
下列关于开放式基金开户或认购的说法中,正确的有()
影响从众的因素有()。
某电脑销售商试销某一品牌电脑(出厂价为3000元/台),以4000元/台销售时,平均每月可销售100台.现为了扩大销售,销售商决定降价销售,在原来1月份平均销售量的基础上,经2月份的市场调查,3月份调整价格后,月销售额达到576000元.已知电脑价格每台下
______adecliningbirthrate,therewillbeanover-supplyof35000primaryschoolplacesby2010,______leaving35schoolsid
最新回复
(
0
)