题目

素数（质数）：就是一个大于等于2的整数,并且只能被1和本身整除,而不能被其它整除数的数.
输入一个数.判断他/她是否是素数.还是VB编程、、

提问时间：2020-10-30

答案

Private Sub Command1_Click()
a = Val(InputBox("输入一个数"))
For i = 2 To a - 1
If a Mod i = 0 Then Exit For
Next
If i = a Then MsgBox a & "是素数" Else MsgBox a & "不是素数"
End Sub