若有如下程序：
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 Function
单击命令按钮，执行程序，输出结果是( )。

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

初创时期的教育心理学著作，内容等是以（）的原理阐释实际的教育问题，主要是一些有关学习的资料。

A．儿童心理学

B．教育心理学

C．普通心理学

D．学习心理学