下列程序 Private Sub Form_Click() Dim a a = Array("天天向上", "天津大学", "天上人间", "程序设计") For i = LBound(a) To UBound(a) If Left(a(i), 1) = "天" Then Print a(i); Next i End Sub 运行时输出的结果是()。
:A. 天天向上
B. 天天向上天津大学天上人间
C. 出错信息
D. 天天向上天津大学天上人间程序设计
第1题:
给出下面程序的代码: byte[ ] array1, array2[ ]; byte array3[ ][ ]; byter[ ][ ] array4; 下列数组操作语句中不正确的是( )。
A.array2=array1
B.array2=array3;
C.array2=array4
D.array3=array4
第2题:
下列程序运行时输出的结果是( )。 Private Sub Form_Click() Dima a=Array("天天向上","清华大学","天上人间","程序设计") forI=Lbound(a,1) to Ubound(a,1) ifleft(a(i),1)="天"then print a(i); nextI End Sub
A.天天向上
B.天天向上天上人间
C.出错信息
D.天天向上清华大学天上人间程序设计
第3题:
此题为判断题(对,错)。
第4题:
在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程: Private Sub Commandl_Click() Dim() a=Array(”机床”,”车床”,”钻床”,”轴承”)Printa(2)EndSub程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。
A.机床
B.车床
C.钻床
D.轴承
第5题:
下列程序运行时输出的结果是
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.天天向上清华大学天上人间程序设计