首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
运行下列程序时,输出的结果是( )。 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-12-04
34
问题
运行下列程序时,输出的结果是( )。
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 SubaSoftware
Private Sub Command l Click()
Dim a(4,4)As Variant
For i=1 To 4
For j=1 To-4
a(i,j)=(i-1)*3+j
Next j
Next i
For i=3 To 4
For{=3 To 4
Print a(i,j)
Next i
Next i
End Sub
该稗序执行后,输出结果是( )。
选项
A、9
1 0
1 2
1 3
B、7
10
12
13
C、9
12
10
13
D、8
11
9
12
答案
B
解析
本题考查变体类型。变体类型变量可通过Array函数来存放多个元素,做为数组进行处理。要读取数组上界时,可使用UBound(x)来实现,要读取数组下界时,LBoundq[x)来实现。因为题中x存放了多个字符串,i表示第一个字符串的行下标的下界,UBound(x,1)表示第一个字符串的行下标的上界。利用Left函数取得每一行数组元素的最左边的字符,然后判断是否为“S”,如果是,则输出该元素。
转载请注明原文地址:https://kaotiyun.com/show/sVLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在列表框中当前被选中的列表项的序号是由下列()属性表示的。
将Cos(Y)四舍五入保留3位小数的表达式是()。
将任意一个正的两位数N的个位数与十位数对换的表达式为()。
下列程序段在窗体上输出______,在立即窗口中输出______。S1="software"S2="hardware"S3="computer"PrintRight(S1,3)Picture1.PrintMid(S2,2,4)Debug.P
在dountil…Loop循环中,判断循环表达式与结束循环的关系是______。
对长度为n的线性表排序,在最坏情况下,比较次数不是n(n-1)/2的排序方法是
将C盘根目录下的图形文件moon.jpg装入图片框Picturel的语句是______。
对于长度为n的线性表,在最坏情况下,下列各排序法所对应的比较次数中正确的是()。
下面关于对象概念的描述中错误的是
数据结构分为逻辑结构和存储结构,循环队列属于______结构。
随机试题
简述不视为侵犯专利权的情形。
有促进乳汁分泌作用的是
治疗虚劳心阳虚者,应首选()
A.效能B.阈剂量C.治疗量D.治疗指数E.效价产生药理效应的最小药量是
大气中的臭氧层主要集中在()。
如图15—4—18所示,用力法且采用图(b)所示的基本体系计算图(a)所示梁,△1P为()。
下列作者与其作品对应有误的一项是()。
若数据链路层采用回退N滑动窗口字而已,发送帧的序列号用7bit表示,发送窗口的最大值为()。
A、ThecoldestpartofAntarctica.B、ThemostfragilepartofAntarctica.C、TheclosestpartofAntarcticatoAustralia.D、Thepa
BallGamesBallgameshavebecomeanintegralpartofmodernsociety.Theygiveusentertainment,providingusameanstosafely
最新回复
(
0
)