將I,j,n表示為整數
n = TextBox1。文本
標簽2。文本= " "
對於i = n到1步長-1
標簽2。Text = Label2。文本& amp空間(n - i)
對於j = 1到2 * i - 1
標簽2。文本=標簽2。文本& ampn - i + 1
然後
標簽2。文本=標簽2。文本& ampvbCrLf