dim a as string

創(chuàng)新互聯(lián)是專業(yè)的望花網(wǎng)站建設公司,望花接單;提供網(wǎng)站建設、成都做網(wǎng)站,網(wǎng)頁設計,網(wǎng)站設計,建網(wǎng)站,PHP網(wǎng)站建設等專業(yè)做網(wǎng)站服務;采用PHP框架,可快速的進行望花網(wǎng)站開發(fā)網(wǎng)頁制作和功能擴展;專業(yè)做搜索引擎喜愛的網(wǎng)站,專業(yè)的做網(wǎng)站團隊,希望更多企業(yè)前來合作!
dim b() as string
dim i as integer
a="abc"
redim b(4)
for i=0 to 4
b(i)=a
next
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
如果你要每個都不同那就這樣:
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
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這個語句后面的語句(如果還有的話)。
至于Picture1.print a(i);'''';,這是在打印a(i)后不換行,再打印一個" ",這里面不是什么也沒有,而是有一個空格。printf語句后面的分號表示打印后不加入其它內(nèi)容,下一次緊接著輸出其它的內(nèi)容。
分享名稱:vb.net數(shù)組賦初值 vb對數(shù)組初始賦值代碼
標題鏈接:http://chinadenli.net/article8/ddochip.html
成都網(wǎng)站建設公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站排名、網(wǎng)站設計公司、定制開發(fā)、域名注冊、面包屑導航、網(wǎng)站策劃
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)