以下vb代码为什么显示的不一样（有tab(j*6)与没有tab)

Private Sub Command1_Click()
Picture1.Cls
For i = 0 To 3
For j = i To 3
Picture1.Print b(i, j);

Next j
Picture1.Print
Next i
End Sub

Private Sub Command2_Click()
Picture2.Cls
For i = 0 To 3
For j = i To 3
Picture2.Print Tab(j * 6); b(i, j);
Next j
Picture2.Print
Next i
End Sub

▲▲
　　你的认为是错误的。
这是由一个两重循环来控制输出的。第一重确定行数，请注意是从多到少，从4到1；第二重循环是控制每行输出的*的个数的，*的个数受第一重循环中I值的影响。所以输出是由多到少。
换行这里用的VB的默认功能，即如果输出的地方已经有过输出，就会自动换行。这样做是可以的。如果严谨一点的话，应该增加一行代码换行。

严谨一点的代码是：
Private Sub Form_Click()
For i = 4 To 1 Step -1
For j = 0 To i - 1
Print Tab(j + 3); "*";
Next j
Print '这里用空打印来换行要严谨些，容易懂，而你的代码省略了，但也可行。
Next i
End Sub

你好！ ■■■■当然不一样了，没有Tab(j * 6)的会紧挨着输出数据！有Tab(j * 6)的就实现了定位输出。Tab(j * 6)可以根据j的值输出到指定的位置。 如果对你有帮助，望采纳。