问题详情

试题35

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

Private Sub Command0_Click()

Dim I As Single ， J As Single

For I= 2 To 10

For J = 2 To I/2

If I mod J = 0 Then Exit For

Next J

If J > sqr (I) Then Debug .Print I;

Next I

End Sub

A．1 5 7 9

B．4 6 8

C．3 5 7 9

D．2 3 5 7