Example - IsArray Function

Sub Main()
    Dim MArray(1 To 5) As Integer, MCheck
    MCheck = IsArray(MArray)
    MsgBox MCheck
End Sub