怎么用VB编程判断97是否是质数？要完整程序谢谢

Answer 1

Option Explicit
Private Sub Command1_Click()
    Dim i%, num%, isPrime As Boolean
    num = 97
    isPrime = True
    
    For i = 2 To 96
        If 97 Mod i = 0 Then
            isPrime = False
            Exit For
        End If
    Next i
    
    If isPrime Then
        '97是质数
    Else
        '97不是质数
    End If
End Sub