VB.net數(shù)組賦初值！

dim a as string

創(chuàng)新互聯(lián)是專業(yè)的望花網(wǎng)站建設(shè)公司，望花接單;提供網(wǎng)站建設(shè)、成都做網(wǎng)站,網(wǎng)頁設(shè)計(jì),網(wǎng)站設(shè)計(jì),建網(wǎng)站,PHP網(wǎng)站建設(shè)等專業(yè)做網(wǎng)站服務(wù);采用PHP框架,可快速的進(jìn)行望花網(wǎng)站開發(fā)網(wǎng)頁制作和功能擴(kuò)展;專業(yè)做搜索引擎喜愛的網(wǎng)站,專業(yè)的做網(wǎng)站團(tuán)隊(duì),希望更多企業(yè)前來合作!

dim b() as string

dim i as integer

a="abc"

redim b(4)

for i=0 to 4

b(i)=a

next

vb如何為數(shù)組賦初值

2種方法

1. 直接賦值，此法只適合和小數(shù)組

Dim myArray() as Integer ={1,2,3,4,5}

或Dim myArray(5)as integer

myArray(0)=1

myArray(1)=2

myArray(2)=3

myArray(3)=3

myArray(4)=5

myArray(5)=6

2.最常用的for next循環(huán)賦值

Dim myArray()as integer

For intCount as Integer= 0 to 5

myArray(intCount)=你要賦值的東西

Next

如果你要每個(gè)都不同那就這樣：

Dim myArray()as integer

Dim FuZhi as integer

For Fuzhi as 0 to 5

For intCount as Integer= 0 to 5

myArray(intCount)=fuzhi

Next intCount

Next fuzhi

VB中給數(shù)組元素賦初值

For i =1 To 10

A(i)=0

Next i

就是先讓i等于1，，然后執(zhí)行A(1)=0，遇到Next i，就自動給i加1，i 變成2，回到上面，未超過10，就再執(zhí)行A(2)=0，如此這般，一直執(zhí)行到A(10)=0，自動給i加1，i 變成11，再回到上面，已超過10，就不再執(zhí)行循環(huán)體。繼續(xù)執(zhí)行Next i這個(gè)語句后面的語句（如果還有的話）。

至于Picture1.print a(i);'''';，這是在打印a(i)后不換行，再打印一個(gè)" "，這里面不是什么也沒有，而是有一個(gè)空格。printf語句后面的分號表示打印后不加入其它內(nèi)容，下一次緊接著輸出其它的內(nèi)容。

分享名稱：vb.net數(shù)組賦初值 vb對數(shù)組初始賦值代碼
標(biāo)題鏈接：http://chinadenli.net/article8/ddochip.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供網(wǎng)站排名、網(wǎng)站設(shè)計(jì)公司、定制開發(fā)、域名注冊、面包屑導(dǎo)航、網(wǎng)站策劃

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來源： 創(chuàng)新互聯(lián)