1樓：匿名使用者
dim cnt1 as variant
cnt1=array(1600,0,0,0,0)
******************************==
array 函式
返回乙個包含陣列的 variant。
語法array(arglist)
所需的 arglist 引數是乙個用逗號隔開的值表，這些值用於給 variant 所包含的陣列的各元素賦值。如果不提供引數，則建立乙個長度為 0 的陣列。
說明用來表示陣列元素的符號由變數名、圓括號以及括號中的所需元素的索引號組成。在下面的示例中，第一條語句建立乙個 variant 的變數 a。第二條語句將乙個陣列賦給變數 a。
最後一條語句將該陣列的第二個元素的值賦給另乙個變數。
dim a as variant
a = array(10,20,30)
b = a(2)
使用 array 函式建立的陣列的下界受 option base 語句指定的下界的決定, 除非 array 是由型別庫（例如 vba.array )名稱限定。如果是由型別庫名稱限定，則 array 不受 option base 的影響。
注意 沒有作為陣列宣告的 variant 也可以表示陣列。除了長度固定的字串以及使用者定義型別之外，variant 變數可以表示任何型別的陣列。儘管乙個包含陣列的 variant 和乙個元素為 variant 型別的陣列在概念上有所不同，但對陣列元素的訪問方式是相同的。
2樓：匿名使用者
dim a as variant
a = array(10,20,30)
b = a(2)
array函式返回的是變體型 你要用該函式是不能給陣列變數賦值
3樓：匿名使用者
dim cnt1
cnt1 = array(1600, 0, 0, 0, 0)或者dim cnt1(1 to 5) as longcnt1(1)=1600
vb怎麼定義字串陣列？怎麼賦值？
4樓：傲血殘鋒
定義字串陣列： dim aa(x) as string '其中x是陣列裡元素數量，x從0開始。
賦值： 一般用迴圈，如： for ...next語句 。
每次使用redim語句都會使原來陣列中的值丟失，可以在redim語句後加preserve引數來保留陣列中的資料，但使用preserve只能改變最後一維的大小，前面幾維大小不能改變。
使用動態陣列的優點是根據使用者需要，有效地利用儲存空間，它是在程式執行到redim語句時才分配儲存單元，而靜態陣列是在程式編譯時分配儲存單元。
5樓：
dim strarray() =
解釋：vb定義字串陣列與定義其它陣列沒大的區別，只是其賦值一般需要通過迴圈來獲取來自某個特定**的字串集合。
dim strsj(100) as string，本句宣告乙個下標為0，上標為100的共有101個元素的字串陣列。
參考資料
vb如何為陣列賦初值
6樓：
dim i,j,t
dim a(1 to 5) as integerrandomize
for i=1 to 5
restart:t=int((100-1+1)*rnd+1))for j=1 to ubound(a)
if a(j)=t then
goto restart
end if
a(i)=t
print a(i)
next i
這裡給a陣列中的每個值賦乙個不同隨機初始值
7樓：麥香甜甜圈
只能為陣列中的逐個元素賦初值
參考：dim a(1 to 5) as integera(1)=2
a(2)=4
a(3)=5
a(4)=33
a(5)=89
vb中給陣列元素賦初值
8樓：閃星
有問題請追問，滿意請採納，新年快樂！加油！
9樓：匿名使用者
1、vb6定義陣列時不需要人為初始化陣列，它會自動把數值型陣列的每個元素初始化為0，把字串陣列的每個元素初始化為空串。
2、如果你想象c語言一樣初始化，只能對variant型別的陣列以以下方式賦值：
dim myweek
myweek = array("mon", "tue", "wed", "thu", "fri", "sat", "sun")
3、variant型別陣列和位元組陣列以外的其它型別陣列只能乙個乙個賦值，或用迴圈賦值。
10樓：聽不清啊
for i =1 to 10
a(i)=0
next i
就是先讓i等於1，，然後執行a(1)=0，遇到next i，就自動給i加1，i 變成2，回到上面，未超過10，就再執行a(2)=0，如此這般，一直執行到a(10)=0，自動給i加1，i 變成11，再回到上面，已超過10，就不再執行迴圈體。繼續執行next i這個語句後面的語句（如果還有的話）。
至於picture1.print a(i);'''';，這是在列印a(i)後不換行，再列印乙個" "，這裡面不是什麼也沒有，而是有乙個空格。printf語句後面的分號表示列印後不加入其它內容，下一次緊接著輸出其它的內容。
vb 陣列賦值問題
11樓：匿名使用者
ia()這是個陣列變數
它一開始dim ia(10) as integer 你就定義它的範圍在0-10
你把for i 改4-14 超過範圍的部分 當然會出錯。
不必對應 示例只是給你乙個簡單賦值而已 你想要陣列哪個元素賦值什麼都隨你高興
private sub command1_click()dim ia(10) as integerfor i = 0 to 10
ia(i) = "我是數字" & i
print i;
next i
end sub
12樓：匿名使用者
陣列的定義有兩種形式。第一種：dim arrayname(n) as type。
這種形式中，陣列變數是從arrayname(0)~arrayname(n)，共n+1個元素。第二種：dim arrayname(lower to upper) as type。
這種形式中可以定義陣列上界和下界，比如dim ia(4 to 14) as integer。這樣就可以對應從ia(4)到ia(14)的賦值。至於對應問題，不是硬性規定的，你可以隨意賦值，這要按程式要求了，比如程式要求改成ia(i)=i+10，就不是那樣對應了
13樓：匿名使用者
不行，ia(1)=1 ia(2)=2……。乙個乙個的給陣列裡的元素賦值，
vb 陣列怎麼定義與賦值？
14樓：匿名使用者
dim cnt1 as variant
cnt1=array(1600,0,0,0,0)
******************************==
array 函式
返回乙個包含陣列的 variant。
語法array(arglist)
所需的 arglist 引數是乙個用逗號隔開的值表，這些值用於給 variant 所包含的陣列的各元素賦值。如果不提供引數，則建立乙個長度為 0 的陣列。
說明用來表示陣列元素的符號由變數名、圓括號以及括號中的所需元素的索引號組成。在下面的示例中，第一條語句建立乙個 variant 的變數 a。第二條語句將乙個陣列賦給變數 a。
最後一條語句將該陣列的第二個元素的值賦給另乙個變數。
dim a as variant
a = array(10,20,30)
b = a(2)
使用 array 函式建立的陣列的下界受 option base 語句指定的下界的決定, 除非 array 是由型別庫（例如 vba.array )名稱限定。如果是由型別庫名稱限定，則 array 不受 option base 的影響。
注意 沒有作為陣列宣告的 variant 也可以表示陣列。除了長度固定的字串以及使用者定義型別之外，variant 變數可以表示任何型別的陣列。儘管乙個包含陣列的 variant 和乙個元素為 variant 型別的陣列在概念上有所不同，但對陣列元素的訪問方式是相同的。
15樓：匿名使用者
dim a as variant
a = array(10,20,30)
b = a(2)
array函式返回的是變體型 你要用該函式是不能給陣列變數賦值
vb 陣列 定義 賦值
16樓：網海1書生
vb6是沒有 x(10) = [0,1,2,3,4,5,6,7,8,9] 這樣的陣列賦值方法的，正確的應該是：
dim x() as variant '變數必須設為variant型，否則型別不匹配
x = array(0, 1, 2, 3, 4, 5, 6, 7, 8, 9)
此外，你這個程式是把簡單問題複雜化了，看起來有點傻傻的，下面是簡化的：
private sub command1_click()
dim a as double
for a = 1000000000 to 9999999999#
text1.text = text1.text & a & " "
next a
end sub
最後再補充一下，由於資料量太大，遠遠超過文字框64k的限制，所以執行時肯定會出錯的，先提醒你
17樓：匿名使用者
for i = 0 to 9
x(i) = i
next
用類似以上方式賦值陣列元素
x(10) = [0,1,2,3,4,5,6,7,8,9] 這種在vb6中不允許
18樓：匿名使用者
dim cnt1 as variant
cnt1=array(1600,0,0,0,0)
******************************==
array 函式
返回乙個包含陣列的 variant。
語法array(arglist)
所需的 arglist 引數是乙個用逗號隔開的值表，這些值用於給 variant 所包含的陣列的各元素賦值。如果不提供引數，則建立乙個長度為 0 的陣列。
說明用來表示陣列元素的符號由變數名、圓括號以及括號中的所需元素的索引號組成。在下面的示例中，第一條語句建立乙個 variant 的變數 a。第二條語句將乙個陣列賦給變數 a。
最後一條語句將該陣列的第二個元素的值賦給另乙個變數。
dim a as variant
a = array(10,20,30)
b = a(2)
使用 array 函式建立的陣列的下界受 option base 語句指定的下界的決定, 除非 array 是由型別庫（例如 vba.array )名稱限定。如果是由型別庫名稱限定，則 array 不受 option base 的影響。
注意 沒有作為陣列宣告的 variant 也可以表示陣列。除了長度固定的字串以及使用者定義型別之外，variant 變數可以表示任何型別的陣列。儘管乙個包含陣列的 variant 和乙個元素為 variant 型別的陣列在概念上有所不同，但對陣列元素的訪問方式是相同的。
vb中陣列的定義是什麼，VB中陣列的定義是什麼
dim a 10 as integer dim b 3 to 5 as string 3 宣告了b是陣列名 字串型 一維陣列 有9個元素，下標的範圍是 3 5，每個元素最多存放3個字 dim c 1 to 5，4 as long 宣告了c是陣列名 長整型 二維陣列 第一維下標範圍為 1 5，第二維下...
vb如何定義未知大小一維陣列，vb 如何定義乙個未知大小一維陣列？
動態陣列陣列到底應該有多大才合適，有時可能不得而知。所以希望能夠在執行時具有改變陣列大小的能力。動態陣列就可以在任何時候改變大小。在 visual basic 中，動態陣列最靈活 最方便，有助於有效管理記憶體。例如，可短時間使用乙個大陣列，然後，在不使用這個陣列時，將記憶體空間釋放給系統。如果不用動...
vb如何定義m行n列的二維陣列，vb如何定義乙個m行n列的二維陣列
要看具體設定 option base 在模組級別中使用，用來宣告陣列下標的預設下界option base後面只能是0或者1 由於預設是0 所以是0的時候可以不用option base語句只有當你想option base 語句來取代陣列下標的預設值 0時才有必要用option base 1而且只能是o...
vb陣列擷取，vb中陣列元素的提取問題
private sub command1 click dim a as string,ac,ia split text1.text,vbcrlf ac val text2.text if ubound a ac and ac 0 thenfor i 0 to ac 1 text3.text text...
陣列指標定義
首先，應該明白 int p a 相當於int p p a a也是位址，是陣列的首位址，不過a是個常量，是不能變的！p是指標，儲存的是位址 p是指定位址所在單元的值，在這裡就是陣列元素。p 變化了，就是指向了不同的元素，p變了，所指的元素沒有變，是元素的值變了。p i 問題出在這裡。int p a 這...