VB程序语言写出主要程序段：判断一个给定的数X是否是素数。

Answer 1

判断n是否为素数,可用n除以2到根号n之间所有的整数,除不尽则n为素数
For a = 2 To Int(Sqr(n))
If n Mod a <> 0 Then '余数不为0,则n为素数
isprime = True 'n为素数
Else
isprime = False 'n不为素数
Exit For '退出for循环
End If
Next a

Answer 2

Private Sub Form_Click()
Dim i As Integer, m As Integer
m = Val(InputBox(""))
For i = 2 To m - 1
If m Mod i = 0 Then Exit For
Next i
If i >= m Then
Print m; "是素数"
Else
Print m; "不是素数"
End If
End Sub

Answer 3

这类的问题太多了