2. 计算机
  3. 下列程序运行时输出的结果是 Private Sub Form_Click() Dim x x=Array("天天向上","清华大学","天上人间","程序设计") For i=LBound(a,1) to UBound(a,1) If Left(a

下列程序运行时输出的结果是 Private Sub Form_Click() Dim x x=Array("天天向上","清华大学","天上人间","程序设计") For i=LBound(a,1) to UBound(a,1) If Left(a

admin2010-11-20  22
问题 下列程序运行时输出的结果是
Private Sub Form_Click()
Dim x
x=Array("天天向上","清华大学","天上人间","程序设计")
For i=LBound(a,1) to UBound(a,1)
If Left(a(i),1)="天"Then Print a(i);
Next
End Sub
选项 A、天天向上
B、天天向上天上人间
C、出错信息
D、天天向上清华大学天上人间程序设计
答案B
解析 考查数组Lbound和Ubound函数的概念和使用方法。通过LBound和UBound函数来返回一个数组中指定维的上界和下界,该程序的作用是找出并返回第一个字是天字的成语,故选B)。
转载请注明原文地址:https://kaotiyun.com/show/gqmp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)