![[单项选择题] 下列程序运行时输出的结果是 Private Sub Form_Click() Dim xx=Array(“天天向上”，“清华大学”，“天上人间”，“程序设计”)For i=LBou](http://www.mshxw.com/aiimages/31/248777.png "[单项选择题] 下列程序运行时输出的结果是 Private Sub Form_Click() Dim xx=Array(“天天向上”，“清华大学”，“天上人间”，“程序设计”)For i=LBou")
[单项选择题] 下列程序运行时输出的结果是 Private Sub Form_Click() Dim xx=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函数来返回一个数组中指定维的上界和下界，该程序的作用是找出并返回第一个字是天字的成语，选B。
