vb 文字檔案中陣列轉置問題

2024-12-31 12:25:04 字數 3117 閱讀 4647

1樓:葉小閒

需要**,不知道你則麼寫的。

使用printline因該不會有這種問題。

vb中 陣列轉置是什麼意思~~

2樓:網友

1 2 3 1 4 7

4 5 6 轉置後: 2 5 8

**示例:private sub form_load()

dim a(2, 2) as long, b(2, 2) as long

dim i as long, j as long, n as long

--a 陣列賦值。

for i = 0 to 2

for j = 0 to 2

n = n + 1

a(i, j) = n

nextnext

--a 陣列輸出。

print "轉置前:"

for i = 0 to 2

for j = 0 to 2

print a(i, j);

nextprint

next---a 陣列轉置後放到 b 陣列。

for i = 0 to 2

for j = 0 to 2

b(j, i) = a(i, j)

nextnext

--b 陣列輸出。

print "轉置後:"

for i = 0 to 2

for j = 0 to 2

print b(i, j);

nextprint

nextend sub

3樓:網友

所謂矩陣的轉置,通俗地講,就是把矩陣的行變成列,列變成行。

在excel裡也有這個功能,選中乙個矩形資料區域,複製 --選擇性貼上,就可以勾選「轉置」,進行相關操作。

用vb編寫一過程,實現乙個二維陣列的轉置。(陣列作為引數)

4樓:聽不清啊

private sub command1_click()

dim a(1 to 3, 1 to 5) as integer, b(1 to 5, 1 to 3) as integer

clsprint "產生的a陣列:"

for i = 1 to 3

for j = 1 to 5

a(i, j) = int(rnd * 100)

print a(i, j);

next j

printnext i

zhuanzhi a, b

printprint "轉置後的b陣列:"

for i = 1 to 5

for j = 1 to 3

print b(i, j);

next j

printnext i

end sub

sub zhuanzhi(byref a() as integer, byref b() as integer)

for i = lbound(a, 1) to ubound(a, 1)

for j = lbound(a, 2) to ubound(a, 2)

b(j, i) = a(i, j)

next j

next i

end sub

5樓:匿名使用者

轉置後是放在同1個陣列還是放在另1個陣列?

編寫vb程式,實現矩陣轉置,即將乙個nⅹm的矩陣的行和列互換。

6樓:home若夕陽西下

private sub command1_click()dim a#(),n1#, n2#, i#, j#n1 = : n2 =

redim a(1 to n1, 1 to n2)redim b(1 to n2, 1 to n1)texttoarray text3, a

for i = 1 to n1

for j = 1 to n2

b(j, i) = a(i, j)

nextnext

arraytotext b, text4

end sub

我也給難住了,在網上找了半天無果後,自己做出來了。。。

雖然對你來說有點晚(n1,n2就是m,n),希望對別人有幫助吧。

vb程式設計,應用二維陣列產生隨機矩陣5*5,並實現矩陣的轉置。

7樓:珈藍惜夢

vb源程式如下:option base 1

private sub command1_click()dim a(5, 5) as integer, b(5, 5) as integer

for x = 1 to 5

for y = 1 to 5

a(x, y) = int(10 + rnd * 90) '隨機產生兩位數的整數。

print a(x, y); '輸出。

nextprint

nextprint

for x = 1 to 5

for y = 1 to 5

b(x, y) = a(y, x) '轉置print b(x, y); '輸出。

nextprint

nextend sub

程式輸出結果如下:

8樓:會飛滴包子

option base 1

private sub command1_click()dim a(5, 5) as integer, b(5, 5) as integer

for x = 1 to 5

for y = 1 to 5

a(x, y) = int(10 + rnd * 90) '隨機產生兩位數的整數。

print a(x, y); '輸出。

nextprint

nextprint

for x = 1 to 5

for y = 1 to 5

b(x, y) = a(y, x) '轉置print b(x, y); '輸出。

nextprint

nextend sub

如何批量刪除幾個文字檔案中某段相同的文字

將要刪除的文字替換成空白的內容 在offie裡可以批量換,把它換成空格就可以 如何批量刪除一和txt檔案中的多個特定的相同文字.開啟txt檔案 左上角編輯 替換 查詢內容為你特定的相同文字,替換為留空 然後按全部替換。另外一種方式,去搜尋一款 字元替換器 軟體,可以批量處理多個txt檔案 可以在開啟...

c如何判斷文字檔案為空

c 判斷文字檔案為空,必須要先讀一下檔案 讀一個字元 才能判斷是否為空。剛開啟檔案時,檔案狀態標識都是初始化狀態,eof 函式是根據檔案狀態標識來判斷當前是否到了檔案尾,而不是用來判斷檔案是否為空。當讀取檔案資料時,遇到檔案尾時,系統會更改檔案狀態標識為檔案尾,同時,返回eof標誌。include ...

文字與檔案有什麼區別,什麼是文字檔案和文字文件,它們有什麼不同嗎?

計算copy機文字是計算機的一bai種文件型別。該類文件du主要用於記載和儲存文字信 zhi息,dao而不是影象 聲音和格式化資料。常見的文字文件的副檔名有.txt doc.docx wps等。計算機檔案屬於檔案的一種,與普通檔案載體不同,計算機檔案是以計算機硬碟為載體儲存在計算機上的資訊集合。檔案...