在窗本上放置一个命令按钮Command1, 并编写下列单击事件的程序：
Option Base 1
Private Sub Command1_Click()
Dim c As Integer, d As Integer
d=0
c=6
X=Array(2, 4, 6, 8, 10, 12)
For i=1 To 6
If X(i)＞c Then
d=d+X(i)
c=X(i)
Else
d=d-c
End If
Next i
Print d
End Sub

A．10

B．12

C．16

D．20

学与教的要素包括：学生、教师、教学内容、______和教学环境。