单项选择题

在窗体上画一个命令按钮，名称为Command1，然后编写如下代码：
Option Base 0
Private Sub Command1_Click()
Dim A1(4) As Integer, A2(4) As Integer
For k=0 To 2
A1(k+1)=InputBox("请输入一个整数")
A2(3-k)=A1(k+1)
Next k
Print A2(k)
End Sub
程序运行后，单击命令按钮，在输入对话框中依次输入2、4、6，则输出结果为

A．0
B．1
C．2
D．3
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() c=1234 c1=Trim(Str(c)) For i=1 To 4 Print ______ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容： 1 12 123 1234 则在横线处应填入的内容为
A．Right(c1,1)
B．Left(c1,i)
C．Mid(c1,1)
D．Mid(c1,i,
单项选择题
设有以下程序： Private Sub Form_Click() x=50 For i=1 To 4 y=InputBox( 请输入一个整数 ) y=Val(y) If y Mod 5=0 Then a=a+y:x=y Else a=a+x End If Next i Print a End Sub 程序运行后，单击窗体，在输入对话框中依次输入15、24、35、46，输出结果为
A．100
B．50
C．120
D．70
相关试题