运行以下程序，显示的结果是（）
Private Sub Command34_Click()
i = 0
D．o
i = i + 1
Loop While i < 10
MsgBox i
E．nd Sub
A．0
B．1
C．10
D．11