在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下事件过程：

Private Sub Command1_Click（）

n = Val（Text1.Text）

F．or i = 2 To n

F．or j = 2 To sqr（i）

If i Mod j = 0 Then Exit For

Next j

If j > Sqr（i） Then Print i

Next i

E．nd Sub

该事件过程的功能是（ ）。

A．输出n以内的奇数

B．输出n以内的偶数

C．输出n以内的素数

D．输出n以内能被j整除的数