1樓：匿名使用者
最後幾句
end if
print m(i, j)
next j
next i
end sub
改成：end if
print m(i, j);" ";
next j
print vbcrlf
next i
end sub
需要更好看的話要用format函式
請問這個方陣用vb怎麼實現，謝謝
2樓：匿名使用者
用pascal實現，原理相同，供參考。
vara:array[1..8,1..7] of integer;
i,j,t:integer;
begin
for i:=1 to 7 do a[1,i]:=i;
for i:=2 to 8 do begint:=a[i-1,7];
for j:=2 to 7 do a[i,j]:=a[i-1,j-1];
a[i,1]:=t;
end;
for i:=1 to 8 do beginfor j:=1 to 7 do write(a[i,j]:3);
writeln;
end;
end.
3樓：匿名使用者
首先定義好陣列，例如 a(1 to 7)，賦值為1~7；
然後一個for迴圈，迴圈中先列印陣列值，然後對陣列進行迴圈右移處理。
請教一個vb問題！ **等，求大神解答呀。 題目如下：建立一個n×n的方陣，方陣的元素值分別為1~n^2的連續
急求!vb程式設計問題:有一個n×m的矩陣,編寫程式,找出其中最大的元素所在的行和列,並輸出其值及行號和列
vb中關於exit sub問題，VB 中的exit do 怎麼理解
exit sub 的作用是結抄束當前的過程bai 不再執行後續程式。針對本程du序，exit sub 的作用是檢查到 未選zhi擇該新增的項dao目 或 專案已經存在 的時候,就不再執行 list2.additem list1.list list1.listindex exit sub 在一來般情況...
vb中exit sub的問題，vb中關於exit sub問題
第二個的錯誤在於如果專案存在，有可能還會新增，例如 combo1.text a 第一項是 a 第二項是 b 第三項是 a 第n 1項是 c 第n項是 a 在檢測到第二項，由於不是a，就會新增一個a，檢測到第n 1項，由於不是a，再增加一個a等等，因此，凡是和combo1.text 內容不符的專案就會...
vb中關於日期函式的問題，VB中關於日期函式的問題
個人認為 執行結果不是因為cdate的作用強制轉換成日期，而是在於year 函式cdate就是字串強制轉換成日期型，比如text1.text 98 1 a cdate text1.text a就等於 1998 01 01 這就是cdate 函式的作用year 功能得到日期值中的年度 有效取值1000...