求大神解答 挺急的 - -

你都输出完了正三角形再输出倒三角，怎么能合一起。除非每一行同时操作正反输出。

这有很难理解吗？
Dim i As Integer, j As Integer
Cls
Print
For i = 1 To 10
Print Tab(20 - i);
For j = 1 To i
Print Chr(64 + j);
Next j
For j = i - 1 To 1 Step -1
Print Chr(64 + j);
Next j
For j = 1 To 11 - i
Print Chr(64 + j);
Next j
For j = 10 - i To 1 Step -1
Print Chr(64 + j);
Next j
Print
Next i