单项选择题

设执行以下程序段时依次输入2，4，6，执行结果为( )。　　Dim a(4)As Integer 　　Dim b(4)AS Integer 　　For k=0 To 2 　　　　a(k+1)=Val(InputBox("Enter data：")) 　　　　b(3 - k) =a(k + 1) 　　Next k 　　Print b(k)

A．2
B．4
C．6
D．0

<上一题目录下一题>

热门试题

单项选择题

下列程序的执行结果为（）。Private Sub Commandl_Click( )Dim X As Integer，y As Integerx=12：y=20Call Value(x，y)Print X；yEnd SubPrivate Sub Value(ByVal m As Integer，ByVal n As Integer)m=m * 2：n=n-5Print m；nEnd Sub

A． 20　　12　 20　　15
B． 12　　20　　12　　25
C． 24　　15　　12　　20
D． 24　　12　　12　　15

单项选择题

下列程序段的执行结果为( )。A=2B=5If A * B ＜ 1 Then B=B - 1 Else B= - 1Print B -A ＞ 0 A) TrueB) FalseC) -1D) 1

A．char str[ ]：{'a'，'b'，'c'}
B．char str[2]={'a'，'b'，'c'}
C．char str[2][3]={{'a'，'b'，}，{'c'，'d'}，{'e'，'f'}}
D．char str( )={'a'，'b'，'c'}

相关试题