如何在VB.NET中将二维数组赋值给listview控件啊,谢谢

如下,我有一个二维数组arrFuhebiao,数组的行数是 Fuhe123FinalNum,列数是ColNum + 3。需要显示在listview控件中,但是提示错误,请问代码是哪里错了呢?谢谢
Dim Items As ListViewItem
With ListView1
For i = 0 To ColNum + 3
.Columns.Add(arrFuhebiao(0, i)) '添加表头
Next
.Items.Clear() '清空            
.View = View.Details '用报表模式显示            
.FullRowSelect = True '整行选择            
.ContextMenuStrip = ContextMenuStrip '指定右键菜单的控件                                  
For i = 0 To Fuhe123FinalNum
For j = 0 To ColNum + 3
.Items(i).SubItems(j).Text = arrFuhebiao(i + 1, j + 1)
Next j
Next i
End With

将二位数组转成DataTable,网上找的不知道成不成
public static DataTable ConvertToDataTable(string[,] arr)
{

DataTable dataSouce = new DataTable();
for (int i = 0; i < arr.GetLength(1); i++)
{
DataColumn newColumn = new DataColumn(i.ToString(), arr[0, 0].GetType());
dataSouce.Columns.Add(newColumn);
}
for (int i = 0; i < arr.GetLength(0); i++)
{
DataRow newRow = dataSouce.NewRow();
for (int j = 0; j < arr.GetLength(1); j++)
{
newRow[j.ToString()] = arr[i, j];
}
dataSouce.Rows.Add(newRow);
}
return dataSouce;

}
温馨提示:答案为网友推荐,仅供参考