Private Sub Form_Load()
Dim a, s, i As Integer
s = Val(InputBox("输入S的值"))
 For a = 2 To s - 1
    If s Mod a = 0 Then Print s & "不是素数": Exit For
      Next a
    If a > s - 1 Then Print s & "是素数"
'    Print a
'    Print s - 1
End Sub

代码如上，本人新手刚刚接触VB，有3个问题想了解下：
 1.If s Mod a = 0 Then Print s & "不是素数": Exit For 这句是什么意思，是不是跳出循环，:这个符号是什么意思呢？
2.If a > s - 1 素数里，这个没了解是什么意思，就是代码没看懂。。。
3.If a > s - 1 Then Print s & "是素数" 这样写为什么就可以不用写end if？ 是因为同一行代码吗？没搞懂

麻烦知道指导下我，谢谢。

1.If s Mod a = 0 Then Print s & "不是素数": Exit For 这句是什么意思，是不是跳出循环，:这个符号是什么意思呢？
: 冒号，在一行的语句中，表示 二个语句写到一行 ，运行时，分二个语句执行 。 与 _ 相反。_表示一行的语句写成多行。
Exit For 中断当前层的 for 循环，跳到 For 语句块后面的第一个命令继续运行。相似的命令还有 exit do
从多层FOR 命令中跳出，可以使用 GOTO 命令，这是唯一推荐使用GOTO 命令的场合。

2.If a > s - 1 素数里，这个没了解是什么意思，就是代码没看懂。。。
FOr 循环结束后，循环变量 会比 终止值 大 ，根据步长来计算大的值。
在该循环中，a 是for循环的循环变量，它的终值是 2+步长*N ，并且终值要大于 s-1。这里的步长是 1 ，所以a 的终值=s 。也就是大于 s-1
if a>s-1 ，表示循环体全部循环过了，没有中途中断循环跳转。

3.If a > s - 1 Then Print s & "是素数" 这样写为什么就可以不用写end if？ 是因为同一行代码吗？没搞懂
IF语句分三种。
行IF。就是一行中写齐 IF ...  THEN  .... ELSE  来。
块IF。就是分多行写。必须要有END IF 结束
IF 条件 THEM
  语句组1
ELSE
  语句组2
END IF
多条件块IF。多行写。必须要用 END IF 结束。
IF 条件1 THEN
  语句组1
ELSEIF 条件2 THEN
  语句组2
ELSEIF 条件3 THEN
  语句组2
。。。。。。
ELSE          '所有条件都不成立时
  语句组N
END IF

另外还有一种IIF函数。
iif(条件,真值，假值）

[ 本帖最后由 风吹过b 于 2014-8-7 11:45 编辑 ]