VB里素数怎么表示啊

VB里可以用一个自定义的函数来判定一个自然数是否素数。
质数（prime number）又称素数，有无限个。一个大于1的自然数，除了1和它本身外，不能被其他自然数整除，换句话说就是该数除了1和它本身以外不再有其他的因数（为了提高效率，只要不能被2~√n的整数整除，就可确定它就是一个素数）；否则称为合数。
以下的函数可以实现这一功能：
Private Sub Command1_Click()

Dim i As Integer
For i = 1 To 1000
If isprime(i) Then List1.AddItem i
Next i
End Sub

Function isprime(n As Integer) As Boolean
isprime = n > 1
For i = 2 To Sqr(n)
If n Mod i = 0 Then isprime = False: Exit Function
Next i
End Function

根据素数定义,一个数如果只能被自身和1整除,称为素数,也就是质数

100以内的素数,vb6代码

For i = 3 To 100 Step 2
For j = 2 To Sqr(i)
If i Mod j = 0 Then Exit For
Next
If j > Sqr(i) Then Debug.Print i;
Next
结果: 3 5 7 11 13 17 19 23 29 31 37 41 43 47 53 59 61 67 71 73 79 83 89 97

怎么表示？素数都是算出来的呀。

Private Sub Form_Click()
For i = 1 To 100
k = 1
For j = 2 To i / 2