1樓:謬衣肇慧英
樓上的做人要厚道啊
dima()
asstring
redim
a(len(text1.text)-1)
asstring
fori=0
tolen(text1.text)-1
a(i)=mid(text1.text,i+1,1)next
補充:不知道你是不是用vb除錯的,是不是忘了新增控制元件,我在知道里的回答絕對是先除錯後回答的,如果還是不行,你把下邊的******中間的**複製到文字檔案並改名為form1.frm,在**里加了把a()列印出來的**
version
5.00
begin
vb.form
form1
caption
="form1"
clientheight
=3090
clientleft=60
clienttop
=450
clientwidth
=4680
linktopic
="form1"
scaleheight
=3090
scalewidth
=4680
startupposition=3
'視窗預設
begin
vb.textbox
text1
height
=735
left
=720
tabindex=1
text
="text1"
top=
1560
width
=3135
endbegin
vb.commandbutton
command1
caption
="command1"
height
=495
left
=1920
tabindex=0
top=
360width
=1455
endend
attribute
vb_name
="form1"
attribute
vb_globalnamespace
=false
attribute
vb_creatable
=false
attribute
vb_predeclaredid
=true
attribute
vb_exposed
=false
private
subcommand1_click()
dima()
asstring
redim
a(len(text1.text)-1)
asstring
fori=0
tolen(text1.text)-1
a(i)
=mid(text1.text,i+
1,1)
next
fori=0
toubound(a)
a(i)
next
endsub
2樓:匿名使用者
同意二樓的說法,一樓什麼人
vb中怎麼將文字框中的內容寫入陣列中
3樓:匿名使用者
private sub command1_click()dim a() as string
a = split(text1.text, ",")for i = 0 to ubound(a)print a(i)
next
end sub
意思是:將文字框裡面的內容以","(逗號)處隔開!!輸出到窗體上
4樓:匿名使用者
先定義一個陣列,再用一個for迴圈,再用一個mid$()內建函式取固定長度的數存入該陣列中。
5樓:匿名使用者
你可以直接給陣列的元素賦值,
如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中怎麼把文字框裡輸入一串字元賦給陣列
6樓:網海1書生
首先要確定,文字框裡輸入的一串字元,資料之間要用固定的、相同的分隔符隔開,否則一切免談。比方說用逗號分開(要注意逗號也分全形和半形的,不能混用):
dim s() as string
s = split(text1.text, ",")
在word中 如何將文字分兩列,如何將WORD中一版的文字分為兩列,謝謝
可以將文字分欄。選中要分列的文字。選擇 頁面布局 選項卡中的分欄。在下拉列表中選擇 兩欄。在格式,分欄中設定。快捷鍵 ctrl enter 如何將word中一版的文字分為兩列,謝謝 1 首先在電腦裡面將需要進行編輯的文件,雙擊開啟。2 開啟了文件之後,在文件裡面選中需要分成兩列的段落內容。3 然後在...
在cdr中如何將文字填入形狀中,coreldrawx4怎麼把文字放在形狀裡
選中要填入的文字,按住滑鼠右健不放,一直拖到你要填入的形狀中,放手,然後出現右健屬性,選擇 置入文字 就ok了 選中文字按住滑鼠託動至圖形上,鬆開,選擇使文字適合路徑選項,使文字成隨圖形形狀排列。然後再選中文字 效果 圖框精確裁剪。就會形成一樣的弧度了。coreldraw x4怎麼把文字放在形狀裡 ...
excel如何將單元格文字內容直接作為引用範圍
右拉下拉 使用indirect函式引用單元格內包含的區域 輸入以下公式 sum indirect a1 countifs c1 c1000,e8 b1 b1000,d8 公式右拉,就可以了 不變的區域加絕對引用符號 用indirect countifs indirect e3 30 indirect...