单项选择题

下列程序在运行时输出的结果是( )。 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

单项选择题

以下事件过程的功能是：从已存在于磁盘上的顺序文件Numl．txt中读取数据，计算读出数据的平方值，将该数据及其平方值存入新的顺序文件Num2．txt中。则在以下横线处合适的语句是( )。 Private Sub Form_Click() Dim x As Single，y As Single Open Numl．txt For Input As #1 Open Num2．txt For Output As #2 Do While Not EOF(1) _________ Print x y=x^2 _________ Print y Loop Close #1，#2 End Sub

A．Input #1，y Print #2，x，y
B．Input #2，x Print #1，x，y
C．Print #1，x Input #2，x，y
D．Input #1，x Print #2，x，y

相关试题