单项选择题

下列程序运行时输出的结果是( )。
Private Sub Form_Click( )
Dim a
a=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) 天天向上清华大学天长地久程序设计
<上一题 目录 下一题>
热门 试题

单项选择题
执行下列程序段后，输出的结果是( )。 For k1=0 To 4 y=20 For k2=0 To 3 y=10 For k3=0 To 2 y=y+10 Next k3 Next k2 Next k1 Print y
A) 90
B) 60
C) 40
D) 10
单项选择题
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For i=1 To 4 x=4 For i=1 To 3 x=3 For k=1 To 2 x=x+6 Next Next Next Print X End Sub 程序运行后，单击命令按钮，输出的结果是( )。
A) 7
B) 15
C) 157
D) 538
相关试题