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

问题：

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

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