Question

计算机程序设计vb？

Answer 1

按照题目要求编写的VB程序如下

Private Sub Form_Load()

Dim i As Integer, j As Integer,n As Integer

n=5

For i = 1 To n

 For j=1 To n-i

  Print " ";

 Next j

 For j=1 To 2*i-1

  Print n-i+j;

 Next j

 Print

Next i

End Sub