1樓：匿名使用者
'在窗體內輸入以下**，執行程式即可看到結果。
'*****====**部分***************
private sub form_load()
dim a(), b(), c()
dim i as integer, j as integer, k as integer
a = array(1, 2, 3) '如果陣列個數有變，可直接在此修改
b = array(10, 20) '如果陣列個數有變，可直接在此修改
'以下**為通用格式，無論a、b陣列如何變化，均會得出陣列c的值
redim c((ubound(a) + 1) * (ubound(b) + 1) - 1)
i = -1
for j = 0 to ubound(b)
for k = 0 to ubound(a)
c(i + 1) = b(j) + a(k)
i = i + 1
next
next
msgbox "a(" & join(a, ",") & ")+b(" & join(b, ",") & ")=" & vbnewline _
& "c(" & join(c, ",") & ")", vbinformation, "陣列相加演示"
end sub
2樓：湘湖泛舟
k=0for i=0 to 2
for p=0 to 3
c(k)=b(i) +a(p)
k=k+1
next p
next i
vb當中array是什麼意思,比如array（1，2，3，4，5）
3樓：匿名使用者
定義一個陣列bai，陣列元素是
du1，2，3，4，5假設dim a() '定義zhi了一個空陣列（沒宣告dao陣列大小）專a=array(1,2,3,4,5) '做陣列賦值，元素為屬1,2,3,4,5，這樣就相當於重定義了a元素範圍為 0-4
4樓：匿名使用者
array是定義陣列的關鍵字；arrary(1,2,3,4,5)就是定義一個有5個元素的陣列，其中陣列的元素分別為1，2，3，4，5。
VB陣列操作，VB怎麼宣告陣列
能你的例子 希望對你有幫助 dim a 3 as integer dim i as integer a 0 1 a 1 2 a 2 3 a 3 4 for i o to 3 text1.text text1.text a i next i vb怎麼宣告陣列 如果有規律就可以用for next 來賦值...
vb定義陣列
阿豪呦 有兩種方法定義陣列 1.知道陣列的元素個數，那麼直接定義 dim a 9 as integer 2.暫時不知道元素個數，或者該陣列應用在多個地方，那麼如下定義 dim a as integer 在使用的時候，再重定義一下就可以了 redim a 9 dim private public 陣列...
VB陣列問題
定義一個二維陣列，第一維你可以理解為行，第二維理解為列。10 表示有0 10 共 11 行 6 表示有 0 6 共7列。當然，前提是你 前面沒有 option base 1 這樣的語句。把陣列裡面的元素 看成下面這樣 1 1 1 1 1 1 11 1 1 1 1 1 11 1 1 1 1 1 11 ...