Imports System
Imports System.Linq
Public Class Program
Public Shared Sub Main()
Dim rectangularArray As String(,) = New String(2, 2) {
{"a", "b", "c"},
{"d", "e", "f"},
{"g", "h", "i"}}
Dim result = rectangularArray.Cast(Of Object)().ToArray()
Console.Write(String.Join(", ", result))
End Sub
End Class
' run:
'
' a, b, c, d, e, f, g, h, i
'