选择题 27.  阅读程序：
    Option Base 1
    Private Sub Form_Click()
    Dim Arr(3, 3) As Integer
    For i=1 To 3
    For i=1 To 3
    If j=i Or j=3-i+1 Then
    Arr(i, j)=1
    Else
    Arr(i, j)=0
    End If
    Next j
    Next i
    For i=1 To 3
    For j=1 To 3
    Print Arr(i, j);
    Next j
    Print
    Next i
    End Sub
    程序运行后，如果单击窗体，则输出结果为______