Sqr 函数返回一个 Double,指定参数的平方根。语法Sqr(number)必要的 number 参数 number 是 Double 或任何有效的大于或等于 0 的数值表达式。'引用自VB6的MSDN 你这段代码的意思就是验证一个正整数n是不是素数,所以i只需要从2循环到n的平方根就可以了,sqr(n)就是求n的平方根,不过得到的结果是双精度Double型的,VB会隐式的转换成与i一致的类型,实际上最好写成For i = 2 To int(Sqr(n))