怎么样用vb画等腰三角形

来源：百度知道 编辑：UC知道 时间：2024/06/02 02:44:54
类似这样的 A
BBB
CCCCC
DDDDDDD
我是用Microsoft Visual Studio 2008,
我的方法是用类似C++那种for循环来做,但VB里字母好象没法在for里用,谁比较清楚的教下我~以前做过但我一下子忘了~

Dim i As Integer , H as integer
H=4 'H表示要打印的行数
For i = 1 To H
Print Space(H - i); String(2 * i - 1, Chr(i + 64))
Next i

Private Sub Command1_Click()

For i = 1 To 9
Print Tab(28 - 3 * i);
For j = 1 To i
Print j;

Next j
For k = i - 1 To 1 Step -1
Print k;
Next k
Print
Next i

End Sub

字母A是65,B是66....自己一个一个加