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樓：匿名使用者
你這是什麼啊，**本身就不全，當然錯了
在EXCEL中如何將文字框中的文字隨文字框一起改變方向
文字內容用藝術字形式插入,然後把文字和藝術字 為 格式 組合起來就可以了.用繪圖工具畫一個也可以啊，右鍵單擊 新增文字。合併單元格也可以的，寫完一行按ctrl enter換行 如何讓文字框中的字型跟著文字框一塊旋轉？你那個 框 應該不是文字框而是圖形框吧，文字框不能旋轉。但以上兩種框內輸內入的文字是...
中如插入文字框,如何刪除文字框的邊框
呵呵 這個我到常用 你只需對著文字框邊線雙擊，在彈出的話框裡的 顏色和線條 裡 顏色 一處選成白色的即可。在外框上單擊右健，將線條一欄的顏色選為無線條顏色，就ok了。選擇 邊框和底紋 在裡邊進行相關的設定 裝文字框的邊框設定為透明即可 在文字框上右擊 文字框屬性 填充設為無顏色即可 word裡如何刪...
vb中我想在文字框中輸入某個數，然後按enter鍵之後，呼叫function
private sub command1 click dim x as long x text1 yes true for i 2 to sqr x if x mod i 0 then yes false exit for end if next i if yes then label1.capti...