根據(jù)你的語(yǔ)句,上下標(biāo)是確定的,所以定義語(yǔ)句修改為:
創(chuàng)新互聯(lián)公司專注于銀海企業(yè)網(wǎng)站建設(shè),成都響應(yīng)式網(wǎng)站建設(shè)公司,商城網(wǎng)站定制開發(fā)。銀海網(wǎng)站建設(shè)公司,為銀海等地區(qū)提供建站服務(wù)。全流程按需網(wǎng)站制作,專業(yè)設(shè)計(jì),全程項(xiàng)目跟蹤,創(chuàng)新互聯(lián)公司專業(yè)和態(tài)度為您提供的服務(wù)
Dim ary(UBound(temp), 1) As String '聲明二維數(shù)組
將二位數(shù)組轉(zhuǎn)成DataTable,網(wǎng)上找的不知道成不成
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;
}
將二位數(shù)組轉(zhuǎn)成DataTable,網(wǎng)上找的不知道成不成
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;
}
for i =0 to ...
for j =0 to ...
keyarray(i,j)=
next
next
雙重循環(huán),賦值和讀取一樣
OPCItemIDsData(j,其中一維)即可。
如果前面方法有規(guī)定,不能用二維數(shù)組的格式,那么你可以自己定義一個(gè)一維數(shù)組,將二維數(shù)組的某一維度的全部數(shù)值賦值給這個(gè)數(shù)組,在引用這個(gè)數(shù)組:
dim OPCItemIDsDataBuf(x) as ...
for i = 1 to x
OPCItemIDsDataBuf(j)=OPCItemIDsData(j,其中一維)
next i
其中x是數(shù)組的最大下標(biāo)
這個(gè)比較簡(jiǎn)單
假如二維數(shù)組是str(row,col)
假設(shè)Workbook是Excel的工作簿對(duì)象
Workbook.worksheets(1).range("A2").Resize(row+1, col+1).Value = str
其中關(guān)鍵的是Excel的Resize方法能快速的插入二維數(shù)組
網(wǎng)頁(yè)名稱:vb.net二維數(shù)組,vb隨機(jī)生成二維數(shù)組
文章轉(zhuǎn)載:http://aaarwkj.com/article22/hchjjc.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供品牌網(wǎng)站設(shè)計(jì)、域名注冊(cè)、App設(shè)計(jì)、網(wǎng)站建設(shè)、關(guān)鍵詞優(yōu)化、虛擬主機(jī)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)