1樓：匿名使用者
private sub command1_click()dim a() as string
a = split(text1.text, ",")for i = 0 to ubound(a)print a(i)
next
end sub
意思是:將文字框裡面的內容以","(逗號)處隔開!!輸出到窗體上
2樓：匿名使用者
先定義一個陣列,再用一個for迴圈，再用一個mid$()內建函式取固定長度的數存入該陣列中。
3樓：匿名使用者
你可以直接給陣列的元素賦值，
如a(0)=text1.text
a(1)=text3.text
……如果你的幾個文字框是控制元件陣列，就更好辦了，比如有6個文字框且為控制元件陣列，則可以
for i=1 to 6
a(i)=text(i).text
next i
如果你只有一個文字框，想輸如一個數字點下 按鈕，然後加入陣列，加個文字框和命令按鈕，然後
dim a(1 to 5)'這個你需要自己定義大小，否則資料超過5個就下界越標什麼的
private sub command1_click()static i as integer
i = i + 1
a(i) = text1.text
for each c in a()
debug.print c
next c
end sub
如何用vb將文字內容存入陣列
4樓：匿名使用者
你給的**是開啟一個文字檔案將每行檔案存入變數wline=split(text1.text,vbcrlf))redim a(lbound(wline) to ubound(wline))
for i = lbound(wline) to ubound(wline)
a(i)=wline(i)
next i
5樓：匿名使用者
你這本身就犯了個概念性的錯誤，文字框和文字檔案是二碼事，**是讀文字檔案的，不錯誤那才怪啊，基礎知識先學習學習吧。
6樓：匿名使用者
你這是什麼啊，**本身就不全，當然錯了
VB將文字框中的漢字按拼音排序
首先將漢字轉為ascii碼陣列，然後對ascii碼陣列排序。再將ascii碼陣列轉換為字元，大功告成了。以下 經測試完全正確。dim lasc j as long private sub command1 click dim i as long,j as long,k as long dim r a...
vb文字框1中的字元反序顯示在文字框2中
網海1書生 text2.text strreverse text1.text private sub command1 click dim m as long,t as long,n as integer m val inputbox 輸入大於1的正整數m 輸入資料 n 1 t 0 do while...
vb如何把檔案內容顯示在文字框中
vb6.0可以使用textbok控制元件或richtextbox控制元件實現將讀入文字檔案顯示於控制元件中。textbox 控制元件有時也稱作編輯欄位或者編輯控制元件，顯示設計時輸入的使用者輸入的 或執行時在 中賦予控制元件的資訊。為了在 textbox 控制元件中顯示多行文字，要將 multili...