不客气，我懂得也不多，同样是在这里学习的。不过，我连一级都没有考，二级就更……

呵呵,不管怎样还是谢谢您了.[em2]

有个问题想请教一下;
Private Sub Command1_Click()
  For a = 1 To 30
  For b = 1 To 30
  For c = 1 To 30
  If a * a + b * b = c * c Then
  Print "a="; a, "b="; b, "c="; c
  End If
  Next c
  Next b
  Next a
为什么把
  Next c
  Next b
  Next a换成next a
next b
next c就不能运行了呢?

把所有的next后面的a，b，c什么的都去掉就可以了
晕，研究得还蛮深入的

这就是循环嵌套的层次问题。
循环的基本规定有一条：必须从for作入口。在这个语句处理时，利用堆栈记录循环的基本数据（变量名、步长、终值）。
如果，不从这里入口，就会有麻烦：遇到next的时候，没有办法处理（即：改变当前值、是否中止）。
例如你所说的：
  For a = 1 To 30
  For b = 1 To 30
  For c = 1 To 30
  If a * a + b * b = c * c Then
  Print "a="; a, "b="; b, "c="; c
  End If
  next a
  next b
  next c
第一次执行到next a的时候就会跑到第一行，到第二行又一次建立b的循环，…………
本来应该是c循环到头，才循环一次b
b循环到头，才循环一次a
不按照嵌套规定，就会造成堆栈溢出，并且不能达到预期目的。所以才有那条规定。
有鉴于此，通常我们书写程序的时候采用缩进方式：
  For a = 1 To 30
      For b = 1 To 30
          For c = 1 To 30
              If a * a + b * b = c * c Then
                  Print "a="; a, "b="; b, "c="; c
              End If
          Next c
      Next b
  Next a
便于阅读。

[em2]恩,懂了.您的解释很透彻.呵呵很感谢,可惜不能再给您打分了.