在窗体上画一个命令按钮，名称为Command1，然后编写如下代码：

Option Base()

Private Sub Command1 Click()

Dim A(4)As Integer,B(4)As Integer

For k=0 To 2

A(k+1)＝InputBox(“请输入一个整数”)

B(3-k)＝A(k+1)

Next k

Print B(k)

End sub

程序运行后，单击命令按钮，在输入对话框中分别输入2、4、6，输出结果为（）。

A．0

B．2

C．3

D．4

品德受道德观念控制，所以有时不是自己的自觉行为。