单项选择题

运行下列语句后，输出的结果是( )。

Option Base 1

Dim a

i=1

a=Array(1,-2,9,0,-1,9)

Do

k=a(i)

For m=10 To k Step-2

n=k+m

Next m

Print n+m

i=i+1

Loop While Abs(m+n)＜＞27

A．3 27-8
B．3-8 27
C．-8 27 3
D．-8 3 27

<上一题目录下一题>

热门试题

单项选择题

阅读下列程序： Private Sub Command1_Click() Dim i As Integer,k As Integer k=2 For i=1 To 3 Print H(k); Next i End Sub Function H(j As Integer) Static b a=0 a=a+1 b=b+1 H=a*b+j End Funmion 单击命令按钮，执行程序，输出结果是( )。

A．2 3 4
B．3 4 5
C．5 6 7
D．3 5 6

单项选择题

窗体上有一个命令按钮Command1和一个列表框List1。先选择列表框中的某一个项目，然后单击命令按钮，将该项目从列表框删除。程序如下： Private Sub Command1_Click() Dim In As Integer In=______ List.Remove Ind End Sub 则在程序的空白行的语句是( )。

A．List1.Index
B．List1.ListIndex
C．List1.Text
D．List1.ListCount

相关试题