如何用VB实现如下的乘法口诀？

很简单!看了就会了哟.
其实可以定位输出,但我不想,你自己去做吧.这里基本可以了.
Option Base 1
Private Sub Command1_Click()
Dim i As Integer
Dim j As Integer
Dim a(9)
Print Tab(4);
For i = 1 To 9
a(i) = i

If i > 3 Then
Print Space(3) & a(i);
Else: Print a(i);
End If
Next i
Print
For i = 1 To 9
Print i; '竖的第一列在这,注意!!!它也不算是第一列,只是第一列的第一个!
For j = 1 To i

Print i * j;
Next j
Print
Next i
End Sub

.....
for y=1 to 9
for x=1 to y
.....

用2维数组应该可以