编写程序，使用筛选法求出2~100的所有素数，筛选法是在2~100的数中先去掉2的倍数，再去掉3的倍数……以此类推，最后剩下的数就素数。注意，2是最小的素数，不能去掉。

Option Base 1 Dim a(100)As Integer Private Sub Command1_Click() n = 100 For i = 2 To Sqr(n) For j = i + 1 To n If j Mod i = 0 And a(j)＜＞ 0 Then a(j)= 0 Next j Next i For i = 1 To n If a(i)＜＞ 0# Then Next i End Sub Private Sub Form_Load () For i = 1 To 100 a (i)=i Next i End Sub

A．List1.Text=Str(a(i))+ vbCrLf

B．List1.Text=Str(a(i))+ vbCrLf

C．List1.AddItem a(i)

D．List1.AddItem=a(i)

A.洛必达法则是求未定式极限的有效方法

B.满足洛必达法则使用条件的未定式，其极限均可以使用洛必达法则求出

C.所有未定式的极限均可以使用洛必达法则求出

D.不是未定式的极限也可以使用洛必达法则计算