n = Val(Text1.Text)
m =
s = “ ”
For i = 1 To n * n
s = s + Str(m)
m = 1- m
If i Mod n = 0 Then
List1.AddItem s
If Then m = 1- m
End If
Next i
实现该功能,则上述程序段横横线处的表达式分别为( )