单项选择题

下列程序运行时输出的结果是
Option Base 1

Private Sub Form_Click()

Dim x(10) As Integer,y(5) As Integer

For i=1 to 10

x(i) =10-i+1

Next

For i=1 to 5

y(i)=x(2*i-1)+x(2*i)

Next

For i=1 to 5

Print y(i)

Next

End Sub

A.3 7 11 45 19
B.19 15 11 7 3
C.1 3 5 7 9
D.不确定的值
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() c= ABCD For n=1 T0 4 Print ______ Next End Sub 程序运行后,单击命令按钮,要求在窗体上显示如下内容: D CD BCD ABCD 则在______处应填入的内容为
A.Left(c,n)
B.Right(c,n)
C.Mid(c,n,1)
D.Mid(c,n,n)
单项选择题
在窗体上画一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编写如下程序: Private Sub Command1_Click() a=InputBox( 请输入日期(1~31) ) t= 旅游景点: &IIf(a>0 And a<=10, 长城 , ) & _ IIf(a>10 And a<=20, 故宫 , ) & IIf(a>20 And a<=31, 颐和园 , ) Text1.Text=t End Sub 程序运行后,如果从键盘上输入16,则在文本框中显示的内容是
A.旅游景点:长城故宫
B.旅游景点:长城颐和园
C.旅游景点:颐和园
D.旅游景点:故宫
相关试题
  • 阅读程序: Option Base 1 Dim arr(...
  • 阅读程序: Function Fun(a As Intege...
  • 编写如下两个事件过程: Private Sub Fo...