素数（质数）：就是一个大于等于2的整数,并且只能被1和本身整除,而不能被其它整除数的数.输入一个数.判断他/她是否是素数.还是VB编程、、
问题描述：
素数（质数）：就是一个大于等于2的整数,并且只能被1和本身整除,而不能被其它整除数的数.
输入一个数.判断他/她是否是素数.还是VB编程、、
答
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