VB文字框組資料更新,VB文字框如何每輸入一個資料換一行

2023-01-12 22:01:39 字數 2802 閱讀 1639

1樓:涐吢銥舊囿儚

假設你的控制元件陣列名稱為text1(你可按實際情況改一下)下標要從0開始、從上到下連續的(如果你介面設計時正常操作,就是這個規律)

private sub command1_click()dim i as long, j as longdim n as long

n = 7    '控制元件陣列中的 textbox 個數i = 0    '控制元件的下標,應該是 0 到 n-1doif (text1(i) = "0") thenn = n - 1

for j = i to n - 1

text1(j) = text1(j + 1)next

text1(n) = ""

end if

i = i + 1

if (i >= n) then exit doloop

end sub

vb文字框如何每輸入一個資料換一行

2樓:匿名使用者

建一個command1,text1,設定text1的multiline屬性true。

**如下。

==============

private sub command1_click()text1.text = ""

dim z as integer, i as integerz = 1

for i = 1 to 10

z = z + 2

text1.text = text1.text & z & vbcrlf

next

end sub

vb中如何建立一個文字框資料組

3樓:網海1書生

先在窗體中放入一個文字框,按ctrl+c複製,再按ctrl+v貼上,這時候會問你是否建立控制元件陣列,點是則新複製的文字框和原來的文字框就組成控制元件陣列了,然後繼續按ctrl+v,就能建立有多個元素的文字框控制元件陣列了。

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 怎麼把結果輸出到文字框裡?

5樓:匿名使用者

參考輸出方法如下:

text1.text="想要的文字"

text1.text = text1.text & outvisual basic是一種由 microsoft 公司開發的結構化的、模組化的、物件導向的、包含協助開發環境的事件驅動為機制的視覺化程式設計語言。

6樓:b悲催

若out為輸出的結果,text1為文字框(若是多行顯示,需設定文字框的multiline屬性為true,可以相應加入空格 & ,或者換行 &vbcrlf

7樓:匿名使用者

給文字框關聯一個控制變數,然後用setwindowtext(「/*結果*/」)函式

8樓:網海1書生

text.text = "插入前:" & vbcrlffor i = n1 to n2

text1.text = text1.text & a(i) & " "

next i

text1.text = text1.text & vbcrlf

vb 如何更新文字框的資料

9樓:匿名使用者

用change 事件來啟用,重新運算

10樓:網海1書生

dim lan(23) as long, lan1(23) as long, lan2(23) as long

dim hai(23) as long, hai1(23) as long, hai2(23) as long

dim e as long,sum as as long, sum1 as long, sum2 as long

sub aaa()

sum=0

sum1=0

for e = 0 to 23

lan(e) = hai1(e) * hai2(e)

lan1(e) = hai(e) * hai2(e)

sum = sum + lan(e)

sum1 = sum1 + lan1(e)

next

label1.caption = sum * 2 & "/" & sum1

end sub

private sub form_load()

aaaend sub

private sub text1_change(index as integer)

hai(index) = val(text1(index).text)

aaaend sub

private sub text2_change(index as integer)

hai1(index) = val(text2(index).text)

aaaend sub

private sub text3_change(index as integer)

hai2(index) = val(text3(index).text)

aaaend sub

vb文字框中 怎麼改變字型大小,VB文字框中 怎麼改變字型大小

改變fontsize屬性,如 private sub command1 click text1.fontsize text1.fontsize 2 end sub vb文字框中 怎麼改變字型大小 在vb上面加上combo 和 textbox 文字框 控制元件,並輸入以下 在form load中加入字...

急急急在VB中有文字框 列表框 按鈕。在

option explicit private sub command1 click list1.additem text1.text chr 9 text2.text end sub private sub command2 click dim i as integer i list1.listi...

文字框 鎖定

將word文件轉換成pdf文件或 然後插入到word中。word沒有這個功能 我沒找到 word中的文字框被鎖定了怎麼解 這個有兩種方法 一 先把框裡的內容拉出來,留下一個空白的框,用剪下命令可消除此空白框。二 將網路上覆制別人的文章先到記事本里,然後再複製到word中,那樣就不帶框。第二種方法其實...