问题
单项选择题
下列程序运行时输出的结果是( )。
Private Sub Form_Click()
Dim a()
a=Array(“天天向上”，“清华大学”，“天长地久”，“程序设计”)
for I=Lbound(a,1) to Ubound(a,1)
if ieft(a(I),1)="天”then print a(I);
next I
End Sub
A) 天天向上
B) 天天向上天长地久
C) 出错信息
D) 天天向上清华大学天长地久程序设计
答案
参考答案：B
解析： left(a(1)，1)表示取原数组元素字符串第一个字符。本题是判断第一个字符是否是“天”，是“天”开头则同行输出，所以答案选B)。