ありがとうございます。教えてもらった以下の方法で希望通りの結果が得られました。

>あるいは型指定した DataTable ではなく、素の DataTable を用いていて、
>型が動的に決まるので自動判定したいという話なら、
> 　　Dim t As Type = arr2D(1, 1).GetType()
>などとして Type を得られますので、それを Columns.Add に渡して定義するという手も。

他の指摘事項についても、すべて了解しました。
どうもありがとうございました。