锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net二维数组赋值 vb 二维数组 赋值

IT技术二维

如何在VB.NET中将二维数组赋值给listview控件啊，谢谢将二位数组转成DataTable，网上找的不知道成不成
public static DataTable ConvertToDataTable(string[,] arr)
{
DataTable dataSouce = new DataTable();
for (int i = 0; iarr.GetLength(1); i)
{
DataColumn newColumn = new DataColumn(i.ToString(), arr[0, 0].GetType());
dataSouce.Columns.Add(newColumn);
}
for (int i = 0; iarr.GetLength(0); i)
{
DataRow newRow = dataSouce.NewRow();
for (int j = 0; jarr.GetLength(1); j)
【vb.net二维数组赋值 vb 二维数组 赋值】{
newRow[j.ToString()] = arr[i, j];
}
dataSouce.Rows.Add(newRow);
}
return dataSouce;
}
vb.net 如何给二维数组赋值 我要第一维存值，第二维存值的位置(像excel一样) 该怎么做，谢谢！Dim xlsApp As Excel.Application
Dim xlsBook As Excel.Workbook
Private Sub Command1_Click()
Dim I, J As Integer
Dim A(500, 2)
Set xlsApp = Excel.Application
xlsApp.Visible = False
'假设Excel文件在vb.net二维数组赋值：D:\Book1.xls
Set xlsBook = xlsApp.Workbooks.Open("D:\Book1.xls")
For I = 1 To 500
For J = 1 To 2
A(I - 1, J - 1) = xlsapp.cells(I, J)
Next J
Next I
'以下是退出Excel
xlsBook.Close (False)
xlsApp.Quit
Set xlsApp = Nothing
'=================================
'Excel中vb.net二维数组赋值的500×2的数据已读入到数组A()中vb.net二维数组赋值，以下可以添加vb.net二维数组赋值你要运算的代码 。
'=================================
End Sub
VB.NET 动态二维数组如何循环赋值和取值for i =0 to ...
for j =0 to ...
keyarray(i,j)=
next
next
双重循环，赋值和读取一样
关于vb.net二维数组赋值和vb 二维数组 赋值的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站 。

    推荐阅读


    上一篇：arcgis面转点，arcgis面转点要素

    下一篇：Android手机安全评估，安卓安全级别