单项选择题
运行下列程序时,输出的结果是( )。 Private Sub Form_Click() Dim x X=Array("Software","and","Hardware","System") For i=LBound(x,1)To UBound(x,1) If Left(x(i),1)="S"Then Print x(i); Next i End Sub
A.Software
B.SoftwareSystem
C.出错信息
D.SoftwareandHardwareSystem
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
下列程序在运行时输出的结果是( )。 Option Base1 Private Sub Form_Click() Dim x(10) For i=1 To 10 x(i)=10-i+1 Next i For i=10 To 1 Step-2 Print x(i) Next i End Sub
A.1 3 5 7 9
B.9 7 5 3 1
C.1 2 3 4 5 6 7 8 9 10
D.10 9 8 7 6 5 4 3 2 1
点击查看答案&解析
单项选择题
下列程序的执行结果为( )。 n=0 j=1 Do Until n>2 n=n+1:j=j+n*(n+1) Loop Print n:j
A.0 1
B.3 7
C.3 21
D.3 13
点击查看答案&解析
相关试题
在考生文件夹中有一个工程文件sjt5.vbp,...
(1)在考生文件夹下有一个工程文件sjt3...
请根据以下各小题的要求设计Visual Basic...
有以下程序段,当在消息框中输入8后,y的...
用Line Input语句从顺序文件读出数据时,...