直角三角形列印

基本架構練習：

Dim InVal As Integer
Dim i, j As Integer

Private Sub Form_Activate()
InVal = 8
For i = 1 To InVal
For j = 1 To i
Print j;
Next j
Print
Next i

End Sub