单项选择题

下列程序运行时输出的结果是
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．天天向上清华大学天上人间程序设计
<上一题 目录 下一题>
热门 试题

单项选择题
为了在按下回车键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True，这个属性是
A．Value
B．Cancel
C．Enabled
D．Default
单项选择题
文本框的SerollBars属性设置为非零值，却没有效果，原因是
A．文本框中没有内容
B．文本框的MultiLine属性值为False
C．文本框的MultiLine属性值为Ture
D．文本框的Locked属性值为Ture
相关试题