查人人中国名人网公路试验员考试简章:求VB编程问题
来源：百度文库 编辑：查人人中国名人网 时间：2024/05/09 11:07:50
要求输出一个矩阵
输出一个5*5的矩阵
第一行为5个1，第二行为4个1，1个0，第三行为3个1，2个0，第四行为2个1，3个0，第五行为1个1，4个0。
输出一个5*5的矩阵
第一行为5个1，第二行为4个1，1个0，第三行为3个1，2个0，第四行为2个1，3个0，第五行为1个1，4个0。
在窗体中加入一个TextBox,以这个TextBox为输出，必须设为多行模式。
代码如下:
Private Sub Form_Load()
Dim i As Integer, j As Integer
For i = 5 To 1 Step -1
For j = 1 To i
Text1.Text = Text1.Text + "1"
Next
For j = i To 4
Text1.Text = Text1.Text + "0"
Next
Text1.Text = Text1.Text + vbCrLf
Next
End Sub