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