vb將二維陣列寫入到檔案中要求列左對齊

1樓：匿名使用者

1、開啟visual basic 6.0軟體，新建一個標準exe工程；

2、在新建的工程窗體上新增兩個按鈕控制元件，分別命名為產生陣列和寫入檔案；

dim a(10, 10) as integer

dim str as string

private sub command1_click()

dim i, j as integer

for i = 1 to 10

for j = 1 to 10

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

str = str & a(i, j) & space(7 - len(cstr(a(i, j))))

next j

str = str & vbcrlf

next i

print str;

end sub

private sub command2_click()

'覆蓋寫檔案

open "d:\1234567890.txt" for output as #1

print #1, str

close #1

msgbox ("寫入檔案完成！")

end sub

private sub form_load()

str = ""

end sub

4、點選執行或者按下f5執行工程，點選產生陣列的按鈕，可以看到產生的陣列，且是左對齊的風格；

5、點選寫入檔案，可以成功將陣列寫入檔案；

6、在d盤主目錄下，可以看到產生的檔案，開啟檔案，可以看到陣列被寫入檔案，且是左對齊的格式。

2樓：

用逗號輸出時對齊：

x=1y=124445

a=123

b=23

print #1, x, y, a, b

3樓：匿名使用者

private sub command1_click()dim a(9, 3) as singlefor i = 0 to 9

for j = 0 to 3

a(i, j) = i * j

next j

next i

open "c:\1.txt" for output as #1x = ""

for i = 0 to 9

for j = 0 to 3

x = x & a(i, j) & vbtabnext j

x = x & vbcrlf

next i

print #1, x

close #1

shell "notepad.exe c:\1.txt", vbnormalfocus

end sub

4樓：歸萱

留下通訊方式，我給你寫完了又給滅掉了

------------------------------

按私信已傳送，一看你就會明白怎麼做，前面給你回答的直接給滅了，全自己寫的我也搞不清楚為什麼會這樣。

vb裡怎麼把陣列寫入txt檔案

5樓：頭**

open filename for output as #1for i=lbound(a,1) to ubound(a,1)for j=lbound(a,2) to ubound(a,2)s=""

s=s & a(i,j) & iif(j=ubound(a,2),"，",)

print #1, s

next

next

close #1

急求，如何用vb讀取txt檔案並儲存到二維陣列裡，如所給的資料 謝謝

請問大神如何用vb將文字檔案的資料存入二維陣列

vc中如何把一個二維陣列的資料寫入txt檔案中

6樓：匿名使用者

#include

#include

#define n 2//資料的行數

using std::ofstream;

using std::endl;

int main(void)

ofs<

}ofs.close(); //關閉檔案return 0;

7樓：風若遠去何人留

可以使用c++的fstream類，將二維陣列中的每個資料逐個寫入txt檔案，並每行換行。

以整型二維陣列寫到txt檔案中為例，**如下：

#include

#include

using namespace std;

int main()

}ofstream out("out.txt");//開啟檔案。

for(i = 0; i < 10; i ++){for(j = 0; j < 10; j ++){out<

8樓：匿名使用者

#include

#include

#define n 2

int main()

for(i = 0; i < n; i++)fclose(fp);

return 0;}

如何用c語言將檔案放到二維陣列中

fopen函式開啟需要讀取的文字，獲取該檔案的檔案描述符使用fscan 函式對檔案進行讀取。放到二維陣列其實就是讀取相應格式的資料，然後對應二維陣列的每個位置例如 include stdio.h define m 300 define n 50 void main file fp if fp fop...

定義二維陣列4 4，二維陣列中的陣列元素都用鍵盤賦值。求出該二維陣列中主對角線的和C語言

include stdio.h include conio.h include stdlib.h main for i 0 i 4 i printf 此矩陣主對角線的和為 d n num include define m 4 int main int i,j,a m m sum 0 for i 0 ...

matlab中怎樣將三維陣列的維賦給二維如A1）賦給二維的B

1,直接賦值 b a 1 試了一下可以。2.先用次sum求每行元素和，因為要求 每個元素都除以每列之和 所以得用1次for迴圈 酷呆愛死呆 1 三維陣列中的各個為也是二維陣列，所以賦值可以直接賦即可！假設a是三維陣列，b是二維陣列 b a 1 b a 2 b a 3 分別把a的三維中的 一 二 三維...