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中能否用文字框加列表框實現組合框的功能
是的，上面一個文字框，下面一個列表框，但組合框有三種風格，簡單組合，下拉選單，組合框三種。你可以設定成三種不同的來試方式 vb中列表框與組合框的區別？列表框直接顯示和選擇列表項，組合框通過下拉選單選擇列表項 列表框可以多選，組合框只能單選 左邊是列表框，右邊是組合框 列表框直接顯示和選擇列表項，組合...
VB 在文字框中輸入英文字元,單擊按鈕會將文字框中的所有大寫字元轉換為小寫,所有小寫字元轉換為大寫
private sub command1 click dim s as string,s1 as strings text1 for i 1 to len s ch mid s,i,1 if ch a and ch z thens1 s1 ucase ch elseif ch a and ch z ...
文字框中如何設定首字下沉？要文字框是透明的不能擋住下
首先，word中的首字下沉實際為將段落的第一個字放入一個 框中，框也屬於word中圖形物件，而圖形物件裡面是不能巢狀圖形物件的，因此，文字框中的文字不能使用首字下沉功能。不過你可以使用文字框與文字框的組合功能，將段落的第一個字單獨放入文字框中，設定文字的格式，取消文字框的邊框和填充顏色，實現下沉的效...