for each是用來(lái)簡(jiǎn)化for的,但你這種寫法有點(diǎn)奇怪,一般沒(méi)這樣用的,通常的用法是

公司主營(yíng)業(yè)務(wù):成都網(wǎng)站制作、成都網(wǎng)站設(shè)計(jì)、移動(dòng)網(wǎng)站開(kāi)發(fā)等業(yè)務(wù)。幫助企業(yè)客戶真正實(shí)現(xiàn)互聯(lián)網(wǎng)宣傳,提高企業(yè)的競(jìng)爭(zhēng)能力。創(chuàng)新互聯(lián)建站是一支青春激揚(yáng)、勤奮敬業(yè)、活力青春激揚(yáng)、勤奮敬業(yè)、活力澎湃、和諧高效的團(tuán)隊(duì)。公司秉承以“開(kāi)放、自由、嚴(yán)謹(jǐn)、自律”為核心的企業(yè)文化,感謝他們對(duì)我們的高要求,感謝他們從不同領(lǐng)域給我們帶來(lái)的挑戰(zhàn),讓我們激情的團(tuán)隊(duì)有機(jī)會(huì)用頭腦與智慧不斷的給客戶帶來(lái)驚喜。創(chuàng)新互聯(lián)建站推出善右免費(fèi)做網(wǎng)站回饋大家。
dim a() as string={....}
dim str as string '定義臨時(shí)變量,它的類型與你數(shù)組中元素類型一致
For Each str In a
MessageBox.Show(str)
Next
你上面代碼中,a就是一個(gè)3個(gè)元素的數(shù)組,從a[0]到a[2], 用for each的時(shí)候,就會(huì)遍歷你的a數(shù)組,上面的代碼相當(dāng)于
for i=0 to a.Length-1
MessageBox.Show(a(i))
next
是這么定義的:
數(shù)組中的第一個(gè)元素的下標(biāo)稱為下界,最后一個(gè)元素的下標(biāo)稱為上界,其余的元素連續(xù)地分布在上下界之間,且數(shù)組在內(nèi)存中也是用連續(xù)的區(qū)域來(lái)存儲(chǔ)的,所以數(shù)組每維的長(zhǎng)度不能超過(guò)Long數(shù)據(jù)類型的最大值,即264—1=263。
把VB.NET數(shù)組當(dāng)作一個(gè)對(duì)象來(lái)處理,就意味著數(shù)組類型是單個(gè)引用類型,數(shù)組變量包括指向構(gòu)成數(shù)組元素、數(shù)組維和數(shù)組長(zhǎng)度等數(shù)據(jù)的指針,數(shù)組之間互相賦值但僅僅是在相互復(fù)制指針,數(shù)組繼承了System名字空間的Array類。
VB.NET中的數(shù)組有兩種類型:定長(zhǎng)數(shù)組和動(dòng)態(tài)數(shù)組。
擴(kuò)展資料:
1、數(shù)組的使用
在’VB 6.0中,能夠用For Each來(lái)循環(huán)遍歷一個(gè)數(shù)組。
比如:
Dim?x?As?Integer
F0r?Each?x?In?arrayl
Console.WriteLine(x)
Next?
2、在VB.NET中能夠使用For循環(huán)和數(shù)組長(zhǎng)度來(lái)遍歷一個(gè)數(shù)組。
比如:
Dim?i?As工nteger? ?
F0r?i=0?T0??(arrayl.Length-1)
(此處空一行)
Console.WriteLine(arrayl(1)J
Next?i
這個(gè)不是遍歷吧!只是簡(jiǎn)單將數(shù)組中的數(shù)取出來(lái)而已;
msgbox(os(a))
給你一個(gè)提示吧!呵呵,剩下的要自己思考哦!
Path:是初始目錄的路徑
Private Sub WriteArray(ByVal Path As String)
'寫入數(shù)組代碼在這里,直接將Path寫到數(shù)組就行了。
Dim dir As New IO.DirectoryInfo(Path)
For Each d As IO.DirectoryInfo In dir.GetDirectories
WriteArray(d.FullName) '遞歸
Next
End Sub
如果子目錄較多那么遞歸會(huì)比較費(fèi)時(shí)間,在調(diào)用遞歸前加入application.doevent就行了,這樣在應(yīng)對(duì)大遞歸時(shí)不會(huì)死機(jī)。
至于數(shù)組嘛使用 arraylist 最好了。
回答補(bǔ)充:
把遞歸去掉就行了啊!
分享標(biāo)題:vb.net中遍歷數(shù)組 vba遍歷
轉(zhuǎn)載注明:http://chinadenli.net/article28/ddodpjp.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供微信公眾號(hào)、品牌網(wǎng)站制作、小程序開(kāi)發(fā)、建站公司、服務(wù)器托管、網(wǎng)站建設(shè)
聲明:本網(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)