运行下列程序 在立即窗口显示的结果是( )。 PrivateSub Command0_Click( )Dim I AsInteger J As

运行下列程序，在立即窗口显示的结果是（）。

PrivateSub Command0_Click（）

Dim I AsInteger，J AsInteger

For I=2To 10

For J=2 To1

If I modJ=0 Then Exit For

Next J

IfJ>sqr(I)Then Debug．Print I;

Next I

End Sub

A.1579

B.468

C.3579

D.2357

请帮忙给出正确答案和分析，谢谢！