Imports System
Imports System.Reflection
Imports Microsoft.VisualBasic
Public Class Example
Public Shared Sub Main()
Try
Dim t = GetType(Example).MakeArrayType(-1)
Catch ex As Exception
Console.WriteLine(vbCrLf & ex.ToString())
End Try
End Sub
End Class