用split函數(shù)

創(chuàng)新互聯(lián)服務(wù)緊隨時代發(fā)展步伐,進(jìn)行技術(shù)革新和技術(shù)進(jìn)步,經(jīng)過十年的發(fā)展和積累,已經(jīng)匯集了一批資深網(wǎng)站策劃師、設(shè)計(jì)師、專業(yè)的網(wǎng)站實(shí)施團(tuán)隊(duì)以及高素質(zhì)售后服務(wù)人員,并且完全形成了一套成熟的業(yè)務(wù)流程,能夠完全依照客戶要求對網(wǎng)站進(jìn)行網(wǎng)站設(shè)計(jì)、成都網(wǎng)站設(shè)計(jì)、建設(shè)、維護(hù)、更新和改版,實(shí)現(xiàn)客戶網(wǎng)站對外宣傳展示的首要目的,并為客戶企業(yè)品牌互聯(lián)網(wǎng)化提供全面的解決方案。
dim a()
a = split("-48.437500 0.000000 -0.000011 0.000011"," ")’按空格將文本拆分成數(shù)組賦值給a
得到的是文本,如果想得到數(shù)字就a(1) = val(a(1))‘把a(bǔ)(1)的值強(qiáng)制轉(zhuǎn)化成數(shù)字賦值給a(1),全部轉(zhuǎn)換自己弄個循環(huán)搞定
大概就這樣,你自己試試吧
for i =0 to ...
for j =0 to ...
keyarray(i,j)=
next
next
雙重循環(huán),賦值和讀取一樣
每行的數(shù)字個數(shù)不同,你說的這是不規(guī)則數(shù)組,解決方案如下:
Dim b As String = ""
Dim a As Integer()() = New Integer(9)() {}
a(0) = New Integer() {0, 1, 2, 3, 4, 5, 6, 7, 8, 9}
a(1) = New Integer() {0, 3, 4, 5}
a(2) = New Integer() {0, 4, 5, 6, 7}
a(3) = New Integer() {0, 6, 5, 8, 9, 1}
a(4) = New Integer() {0, 2, 5, 1, 7}
a(5) = New Integer() {0, 4, 2, 6, 7, 3}
a(6) = New Integer() {0, 4, 5, 3, 2}
a(7) = New Integer() {0, 4, 1, 6, 2, 8, 5, 3}
a(8) = New Integer() {0, 4, 9, 6, 3, 5, 7}
a(9) = New Integer() {0, 1, 5, 9, 7, 6, 2, 4, 3, 8}
For i As Integer = 0 To a.GetUpperBound(0)
b = "第" i + 1 "行有" a(i).GetUpperBound(0) + 1 "個數(shù)" vbCrLf
Next
MessageBox.Show(b)
OPCItemIDsData(j,其中一維)即可。
如果前面方法有規(guī)定,不能用二維數(shù)組的格式,那么你可以自己定義一個一維數(shù)組,將二維數(shù)組的某一維度的全部數(shù)值賦值給這個數(shù)組,在引用這個數(shù)組:
dim OPCItemIDsDataBuf(x) as ...
for i = 1 to x
OPCItemIDsDataBuf(j)=OPCItemIDsData(j,其中一維)
next i
其中x是數(shù)組的最大下標(biāo)
根據(jù)你的語句,上下標(biāo)是確定的,所以定義語句修改為:
Dim ary(UBound(temp), 1) As String '聲明二維數(shù)組
分享題目:vb.net遍歷二維數(shù)組 一維數(shù)組遍歷二維數(shù)組
文章路徑:http://chinadenli.net/article34/hejgpe.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供全網(wǎng)營銷推廣、ChatGPT、品牌網(wǎng)站設(shè)計(jì)、品牌網(wǎng)站制作、面包屑導(dǎo)航、做網(wǎng)站
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)