建站
咨詢(xún)
售后
建站咨詢(xún)
新聞中心
本文向大家介紹VB For Each.Next語(yǔ)句，可能好多人還不了解VB For Each.Next語(yǔ)句，沒(méi)有關(guān)系，看完本文你肯定有不少收獲，希望本文能教會(huì)你更多東西。
創(chuàng)新互聯(lián)是一家集網(wǎng)站建設(shè),九江企業(yè)網(wǎng)站建設(shè),九江品牌網(wǎng)站建設(shè),網(wǎng)站定制,九江網(wǎng)站建設(shè)報(bào)價(jià),網(wǎng)絡(luò)營(yíng)銷(xiāo),網(wǎng)絡(luò)優(yōu)化,九江網(wǎng)站推廣為一體的創(chuàng)新建站企業(yè)，幫助傳統(tǒng)企業(yè)提升企業(yè)形象加強(qiáng)企業(yè)競(jìng)爭(zhēng)力?？沙浞譂M(mǎn)足這一群體相比中小企業(yè)更為豐富、高端、多元的互聯(lián)網(wǎng)需求。同時(shí)我們時(shí)刻保持專(zhuān)業(yè)、時(shí)尚、前沿，時(shí)刻以成就客戶(hù)成長(zhǎng)自我，堅(jiān)持不斷學(xué)習(xí)、思考、沉淀、凈化自己，讓我們?yōu)楦嗟钠髽I(yè)打造出實(shí)用型網(wǎng)站。
VB For Each.Next語(yǔ)句在數(shù)組中的使用：
VB For Each.Next語(yǔ)句好像只是為二種數(shù)據(jù)類(lèi)型專(zhuān)門(mén)度身定做的，其一就是集合，另外一個(gè)就是數(shù)組了。通過(guò)VB For Each.Next語(yǔ)句，可以十分方便的訪問(wèn)數(shù)組中的任一元素。請(qǐng)仔細(xì)分析一下下列代碼：
- Dim arrString ( 2 ) As String = {"星期一","星期二","星期三"}
- Dim Temp As String
- For Each Temp In arrString
- If Temp = "星期三" Then
- MsgBox ( "在數(shù)組中尋找到""星期三""字符串")
- Exit For
- '退出For Each …. Next語(yǔ)句
- End If
- Next
上面代碼的功能是通過(guò)VB For Each.Next語(yǔ)句訪問(wèn)arrString數(shù)組中各元素，如果發(fā)現(xiàn)有元素為字符串“星期三”，則彈出提示框，并退出循環(huán)。
同樣用For … Next語(yǔ)句也能夠?qū)崿F(xiàn)上面同樣的功能，只是感覺(jué)有點(diǎn)不專(zhuān)業(yè)，并且有點(diǎn)繁瑣，下面代碼是用For … Next語(yǔ)句實(shí)現(xiàn)上面VB For Each.Next語(yǔ)句同等功能的代碼：
- Dim i As Integer
- For i = 0 To myString.Length - 1
- If arrString ( i ) = "星期三" Then
- MsgBox ( "在數(shù)組中尋找到""星期三""字符串" )
- Exit For
- End If
- Next
文章名稱(chēng)：淺析VBForEach.Next語(yǔ)句
分享URL：http://www.5511xx.com/article/cdjeohs.html
