蛇形矩阵是由1开始的自然数依次排列成的一个矩阵三角形。小强编写了一个输出n行蛇形矩阵的理序,其功能为在文本框Text1中输入数值n作为蛇形矩阵的行数,点击“输出”按钮Command1后,在List1中显示n行蛇形矩阵,程序界面如图所示。
实现上述功能的VB程序如下,但加框处代码有误,请改正。 Private Sub Command1_Click( ) Dim n,a,b As Integer Dims As String n=Val(Text1.Text) For i=1 To n s="" For j=i To n ‘① s=s+Str(a) Next j ‘② a=b List1.AddItems Next i End Sub 以上程序段运行时,为了实现上述功能,加框处代码应改正为:①;②。
答案:【1】a=a+i【2】b=b+i-1