单项选择题

下列程序运行时输出的结果是
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 To 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.旅游景点:故宫
相关试题
  • Loop while Cout<=n或Loop Until Cou...
  • Print #2,x,y
  • 下面程序是由鼠标事件在窗体上画图,如果按...
  • Input #1,x
  • n=InputBox( 请输入n的值! )