单项选择题

运行下面程序代码后,变量J的值为______。
Private Sub Fun ()
Dim J as Integer
J=10
DO
J=J+3
Loop While J<19
End Sub

A.10
B.13
C.19
D.21