今天我深深的感受到了“；”的作用是怎么了。
Option Explicit
Private Sub Form_click()
    Dim intl As Integer
    Dim intj As Integer
    Dim intTEMP As Integer
   
    Dim A(1 To 5, 1 To 5) As Integer
   
    Print "随机产生矩阵"
   
    For intl = 1 To 5
        For intj = 1 To 5
            A(intl, intj) = Int(Rnd * 90) + 10
        Next
    Next
   
    For intl = 1 To 5
        For intj = 1 To 5
            Print A(intl, intj);
        Next
        Print
    Next
   
    Print vbCrLf
    Print "对矩阵倒置"
   
    For intl = 1 To 5
        For intj = intl + 1 To 5
            intTEMP = A(intl, intj)
            A(intl, intj) = A(intj, intl)
            A(intj, intl) = intTEMP
        Next
    Next
   
    For intl = 1 To 5
        For intj = 1 To 5
            Print A(intl, intj);‘就是这里的;我开始的时候没有注意发现我的程序运行的状态和例子不同。找了好久
        Next
        Print
    Next
       
    Print vbCrLf
End Sub