vb小白询问一个问题

这个求平方数的程序看不懂 （一个整数若是另一个整数的平方，那么它就是平方数，如36是平方数，） 一下是参考答案，但是我有些疑惑
Private Sub Command2_Click()
    Dim sum As Long
    For k = 1 To 100
        For m = 1 To Sqr(a(k))    这里如果sqr后不是整数怎么之办？for会处理小数吗？
            If a(k) = m ^ 2 Then
                sum = sum + a(k)
                n = n + 1
            End If
        Next m
    Next k
    Text1 = Fix(sum / n)
End Sub

追问：谢谢你的回答，我还想请教一下
我自己写的判断是否完全平方数的代码是
if a(k) mod int(sqr（a(k)）)=0 then ...               这个可以判断吗？ 但是算出来答案跟参考答案不一样。。。我自己写的判断是否完全平方数的代码是
if a(k) mod int(sqr（a(k)）)=0 then ...               这个可以判断吗？ 但是算出来答案跟参考答案不一样。。。谢谢你的回答，我还想请教一下
我自己写的判断是否完全平方数的代码是
if a(k) mod int(sqr（a(k)）)=0 then ...               这个可以判断吗？ 但是算出来答案跟参考答案不一样。。。有什么不同？

答案：For m = 1 To Sqr(a(k))
这句中M的默认增量为1就是 For m = 1 To Sqr(a(k)) step 1
M没有小数,也生成不了小数或改成 For m = 1 To int( Sqr(a(k))) 你能更好的理解.

其他：不是整数没有关系，for是跟据步长值来处理的，你是步长值是1缺省了，如果步长值是小数，它才会处理小数。

上一个：vb timer控件小问题，请告诉帮忙解答下
下一个：求解：我在VBA里面利用API做出的控制右键菜单是灰的？ 由于文字限制，API函数声明部份略