首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
运行下列程序时,输出的结果是( )。 Private Sub Form Click() Dim x x=Array(“Software”,“and”,“Hardware“,”System”) For i=LBound(x,1)To UBound(x
运行下列程序时,输出的结果是( )。 Private Sub Form Click() Dim x x=Array(“Software”,“and”,“Hardware“,”System”) For i=LBound(x,1)To UBound(x
admin
2015-11-25
64
问题
运行下列程序时,输出的结果是( )。
Private Sub Form Click()
Dim x
x=Array(“Software”,“and”,“Hardware“,”System”)
For i=LBound(x,1)To UBound(x,1)
If Lefl(x(i),1)=“S”Then Print x(i);
Next i
End Sub
选项
A、Software
B、SoftwareSystem
C、出错信息
D、SotlwareandHardwareSystem
答案
B
解析
本题考查变体类型。变体类型变量可通过Array函数来存放多个元素,做为数组进行处理。要读取数组上界时,可使用UBound(x)来实现,要读取数组下界时,LBound(x)来实现。因为题中x存放了多个字符串,i表示第一个字符串的行下标的下界,UBound(x,1)表示第一个字符串的行下标的上界。利用Left函数取得每一行数组元素的最左边的字符,然后判断是否为“S”,如果是,则输出该元素。
转载请注明原文地址:https://kaotiyun.com/show/PjLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上面有一个列表,然后编写如下两个事件过程:PrivateSubForm_Click()List1.RemoveItem1:List1.RemoveItem2List1.RemoveItem3EndSubPrivateSubForm
设用复制、粘贴的方法建立了一个命令按钮数组Command1,以下对该数组的说法错误的是
VisualBasic集成环境的大部分窗口都可以从主菜单项()的下拉菜单中找到相应的打开命令。
窗体文件的扩展名是
下面程序的功能是利用随机函数模拟投币,方法是:每次随机产生一个0或1的整数,相当于一次投币,1代表正面,0代表反面。在窗体上有三个文本框,名称分别是Text1、Text2、Text3,分别用于显示用户输入投币总次数、出现正面的次数和出现反面的次数,如下图
将C盘根目录下的图形文件moon.jpg装入图片框Picturel的语句是______。
某二叉树中度为2的节点有18个,则该二叉树中有______个叶子节点。
在面向对象方法中,信息隐蔽是通过对象的【】性来实现的。
设有下面的循环:i=0Whilei<=1 i=i+3 PrintiWend则运行后的输出结果是
随机试题
A.分期切痂植皮B.削痂C.一次性切痂植皮D.溶痂后逐步植皮E.蚕食脱痂植皮6%的Ⅲ度烧伤()
有助于鉴别心源性哮喘与支气管哮喘的症状是
8岁男孩,左膝肿痛,急骤加重,活动剧痛,伴有高热。检查左膝关节明显红、肿、热及压痛。X线片示关节间隙增宽,其诊断首先应考虑为
招标人可以考虑使用备选投标方案的情形是()。
与铸铁散热器相比,钢制散热器的特点有( )。
管道是细水雾系统的重要组成部分,管道安装也是整个系统安装工程中工作量最大、较容易出问题的环节,返修也较繁杂。管道的安装主要包括管道清洗、管道固定、管道焊接等加工方法、管道穿过墙体、楼板等。下列有关管道安装说法中,不符合要求的是()。
林先生和林太太已结婚两年,林太太的预产期在2008年的11月。孩子的出生会对整个家庭的经济结构的变化产生巨大的影响。考虑到这一点,林先生找到了理财规划师进行咨询,并要求他为自己制定理财规划。根据林先生的叙述,理财规划师对他的家庭财产状况进行了分析。一、案
卢梭认为,如果要在造就人和造就公民之间选择的话,他会选择造就人。这体现了()的观点。
将Students表的插入权限赋予用户UserA,并允许其将该权限授予他人,应使用的SQL语句为: GRANT(51)TABLEStudentsTOUserA(52);(51)
OnSeptember7,2001,a68-year-oldwomaninStrasbourg,France,hadhergallbladder(胆囊)removedbysurgeonsoperating,viacomp
最新回复
(
0
)