单项选择题

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

单项选择题
下面程序段执行结果为 x=Int(Rnd()+4) Select Case x Case 5 Print excellent Case 4 Print good Case 3 Print pass Case Else Print fail End Select
A．excellent
B．good
C．pass
D．fall
单项选择题
在文本框中，当用户键入一个字符，能同时引发的事件是
A．KeyPress和Click
B．KeyPress和LostFocus
C．KeyPress和Change
D．Change和LostFocous
相关试题