【单选题】

下面程序运行后，输出的结果是

Dim arr(3,3)
For j=1 To 3
For k=1 To 3
　　Arr(j,k)=(j-1)*3+k
Next k
Next j
For j=2 To 3
For j=2 To 3
　　Print art(k,j)；
Next k
Print
Next j
A．2 5
3 6
B．5 8
6 9
C．4 7
5 8
D．5 9
6 8