1樓：匿名使用者
陣列變數不可以隱式的定義
沒有定義陣列變數pic
private sub command2_click()open commondialog1.filename for binary as #1
get #1, 1, b1
get #1, 2, b2
if b1 = 66 and b2 = 77 thenget #1, 29, bc
if bc = 24 then
get #1, 19, w
get #1, 23, h
seek #1, 55
'宣告陣列變數
dim pic(w-1,h-1,2)
for j = h - 1 to 0 step -1for i = 0 to w - 1
for k = 2 to 0 step -1get #1, , pic(i, j, k)next k
next i
if (w * 3) mod 4 <> 0 thenfor k = 1 to 4 - ((w * 3) mod 4)get #1, , pix
next k
end if
next j
for j = 0 to h - 1
for i = 0 to w - 1
picture1.pset (i, j), rgb(pic(i, j, 0), pic(i, j, 1), pic(i, j, 2))
next i
next j
end if
end if
close #1
end sub
2樓：圖杭科技
三維陣列需預定義 dim pic(i, j, k) as byte,
i, j, k必須有具體值。
或定義動態陣列
3樓：匿名使用者
提示的意思是說 pic(*,*,*) 這東西你沒定義，系統不知道 這是什麼
它當成函式找 也找不到 就出錯了~~
4樓：老人與孩v動手洞腦
看上去 pic(i, j, k）是一個3維陣列，你宣告瞭嗎？需要先宣告，後使用。
vb如何將子程式的值傳遞出來，vb 陣列在子程式裡傳遞的問題。求助
有兩種方法可以實現將子程式中的值傳遞出來。1 利用模組級或全域性變數。例如 option explicit r是一個模組級變數 dim r as integer sub add byval x as integer,byval y as integer 將計算結果存放到 r r x y end su...
51微控制器中斷子程式中呼叫其它子程式怎樣呼叫
在主程式裡面呼叫過的函式最好不要在中斷裡面呼叫，因為這關係到函式的遞迴呼叫了。所謂遞迴函式就是在函式裡面呼叫了函式本身。一般在pc機裡面用。這樣處理很麻煩的，在微控制器資源有限的情況下這種情況很容易出現死迴圈，你設想一下，例如你在主函式裡面呼叫了函式a。在中斷裡面也呼叫了函式a。當主程式執行到函式a...
彙編子程式的問題，組合語言子程式是如何定義的
這不是返回自己本身迴圈執行，而是跳轉到子程式的第一行迴圈而已，有什麼不可以的，迴圈結構，任何地方都可以的。但有一點，子程式不論迴圈多少次，最終必須執行一行返加指令ret，也就是子程式必須要有一條ret指令，你的子程式最後是缺少一行ret指令的，加上了就可以的。組合語言子程式是如何定義的?這樣定義的 ...