1樓：匿名使用者
private sub form_click()
dim a(3,3) as integer '定義4 * 4的二維資料
for j=1 to 3 'j 從1到3進行迴圈
for k=1 to 3 'k 從1 到 3進行迴圈
a(j,k)=(j-1)*3+k 'a(j,k)=(j-1)*3+k
next k '將k+1
next j '將j+1
******************************
j=1,k=1: a(1,1)=(1-1)*3 +1=1
j=1,k=2: a(1,2)=(1-1)*3 +2=2
j=1,k+3: a(1,3)=(1-1)*3 +3=3
到此k迴圈結束,進入j的下次迴圈即將j加1,並再次啟動k迴圈
j=2,k=1: a(2,1)=(2-1)*3 +1=4
j=2,k=2: a(2,2)=(2-1)*3 +2=5
j=2,k=3: a(2,3)=(2-1)*3 +3=6
進入j的第三次迴圈,
j=3,k=1: a(3,1)=(3-1)*3 +1=7
j=3,k=2: a(3,2)=(3-1)*3 +2=8
j=3,k=3: a(3,3)=(3-1)*3 +3=9
到這裡已經給陣列a()賦值了,但是並沒有完全賦值,因為a()的下標是從0開始的,即a(0,0) a(0,1) a(0,2) a(0,3) a(1,0) a(2,0) a(3,0)的值都預設為0
********************************
for j=2 to 3
for k=1 to 2
print a(k,j);
next k
next j
j=2,k=1: print a(1,2) 輸出為 2
j=2,k=2: print a(2,2) 輸出為 5
k迴圈結束後會有一個空列印 print目的是換行
j=3,k=1: print a(1,3) 輸出為 3
j=3,k=2: print a(2,3) 輸出為 6
print 換行
end sub
整個程式輸出結果是
2 53 6
2樓：
輸出陣列a(k,j)的值，其實就是一個讀二維陣列的迴圈，
第一個迴圈決定j的值，第二個迴圈決定k的值，應該print四個數。
閱讀下面的程式,寫出程式執行的輸出結果
建議吧bai程式寫成這樣du12 345void main 執行結果應該是852 這樣程式zhi識別的更友好一 dao些，順便說一下，您使內用的標點全都是中容文的，真正寫程式的時候要注意 c語言閱讀下面的程式，寫出程式執行輸出結果 include int f int x int main for迴圈...
vb的小問題，關於vb的小問題
你在做執行程式時，不新增其他的退出按鍵就可以啊！關於vb的小問題 setmynum是一個變數。val表示把括號後面的數轉化為10進位制的數值形式。h是16進位制數字的開頭。寫在 裡面表示加上 h這兩個字元竄。如加號後面的數值 5的話，setmynum就等於val h5 這個意思。號後面的mid su...
關於VB的倆問題，幾個關於VB的問題
第一個問題 沒看懂，什麼叫不能用？第二個問題 不是設定的問題啊。大於小於不等於能直接用的啊！你是說語法錯誤還是說程式結果錯誤。如果是語法錯誤看看你輸入時是不是輸入的全形符號。應該不會是這種錯。問題說清楚點。幾個關於vb的問題 你真的打算0分，讓人幫你解決這7個比較有難度的問題？朋友，你的問題太複雜且...