1樓：匿名使用者
private sub form_load()dim a(1 to 1000) as integer'在text的屬性欄設定這2個屬性
'text1.scrollbars = 2 - vertical'text1.multiline = truetext1.text = ""
for i = 1 to 1000
a(i) = i
text1.text = text1.text & a(i) & " "
next i
end sub
2樓：
for i = 1 to 1000
s = s & a(i) & vbcrlfnext
text1.text = s
3樓：匿名使用者
private sub command1_click()redim a(1 to 1000) as integerdim i as integer
dim l as integer
dim s as string
dim s1 as string
for i = 1 to 1000
a(i) = i
next i
l = 12
for i = 1 to 1000
s1 = "a(" & cstr(i) & ")=" & cstr(a(i))
s1 = s1 & space$(l - len(s1))s = s & s1
if i mod 10 = 0 then s = s & vbcrlf: s1 = ""
next i
text1.text = s
end sub
vb怎樣使用文字框顯示陣列中的全部資料
4樓：匿名使用者
能你的例子 希望對你有幫助
dim a(3) as integer
dim i as integer
a(0)=1
a(1)=2
a(2)=3
a(3)=4
for i = o to 3
text1.text=text1.text & a(i)next i
vb給陣列賦值後如何在文字框text裡輸出
5樓：安諾
for i =0 to 9
text1.text= text1.text & s(i) & vbtab
next
zz396988160的我覺得這裡使用cstr完全沒必要 因為使用了&
6樓：
private sub command1_click()text1.text = ""
dim s(10) as integer
dim i as integer
randomize
for i = 0 to 9
s(i) = int(rnd * 100 + 10)text1.text = text1.text & s(i) & " "
next i
end sub
7樓：
for i = 0 to 9
text1.text = text1.text & " " & cstr(s(i))
next i
8樓：匿名使用者
for i=0 to 9
text1.text=text1.text & s(i) & space(5)
next
vb中文字框可以輸出的內容如何在列表框裡輸出?
9樓：匿名使用者
以下程式實現：在文字框輸入內容，按回車鍵（enter鍵）後，文字框中的內容輸出到列表框。
1）在窗體上佈置一個textbox控制元件和一個listbox控制元件2）**
option explicit
private sub form_load()' 窗體啟動時，清空text1和list1text1.text = ""
list1.clear
end sub
private sub text1_keypress(keyascii as integer)
' 如果按下了回車鍵（回車鍵的ascii碼為13）if keyascii = 13 thendim s as string
' 取出text1中輸入的內容並濾除前後的空格s = trim(text1.text)
if s <> "" then
' 如果text1中輸入的內容不為空，則新增到list1中list1.additem s
' 新增後，清空text1
text1.text = ""
end if
end if
end sub
3）執行效果
窗體啟動時
在text1中輸入，按回車後，輸入的內容在list1中顯示
vb中 如何將一個陣列中的所有內容在同一行輸出到textbox中。 5
10樓：
dim a(10) as string
text1.text=""
for i=0 to 10
text1.text=text1.text & a(i)next i
vb二維陣列文字框輸出
11樓：匿名使用者
文字框text1的multiline設定為truefor i=1 to 4
for j=1 to 5
text1 = text1 & a(i,j) & " "
next j
text1 =text1 & chr(13) & chr(10)next i
12樓：匿名使用者
在text1的屬性視窗設定multiline屬性為true ，容許多行輸出
text1的屬性視窗設定scrollbars 屬性為2 ，容許垂直滾動條
text1.text = 「」
for i = 1 to 4
for j = 1 to 5
text1.text = text1.text & a(i, j) & " "
next j
text1.text = text1.text & vbcrlfnext i
VB中陣列怎麼定義，vb中怎樣定義一個陣列
是這麼定義的 陣列中的第一個元素的下標稱為下界，最後一個元素的下標稱為上界，其餘的元素連續地分佈在上下界之間，且陣列在記憶體中也是用連續的區域來儲存的，所以陣列每維的長度不能超過long資料型別的最大值，即264 1 263。把vb net陣列當作一個物件來處理，就意味著陣列型別是單個引用型別，陣列...
VB程式設計題，用陣列實現隨機輸出小寫英文字母
private sub form click dim a 10 as string dim i as integer,k as integerform1.autoredraw truerandomize print 產生的十個字母是 for i 1 to 10 a i chr int rnd 26 ...
c中在textbox1和textbook2輸入的文字值輸入自動計算顯示在textbox3中
在第二個文字框的textboxchanged裡寫 內部維護一個list，計算兩個站的index的差 liststationlist new list int startindex 0 int endindex 0 private void textbox1 textchanged object se...