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

admin2012-03-22  54

问题 下列程序运行时输出的结果是    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)。
   [错解分析] Lbound和Ubound的概念混淆。
   [考点链接] 数组的应用
转载请注明原文地址:https://jikaoti.com/ti/D6O0FFFM
0

最新回复(0)