在vb中如何用迴圈語句給多個連續文字框賦值

2021-05-02 22:09:13 字數 1014 閱讀 1720

1樓:柴米河畔

dim obj as object, objname as string, i as integer

i = 0

for each obj in me.controls '列舉窗體所有控制元件

debug.print typename(obj)

if typename(obj) = "textbox" then '判讀是否為文字框

i = i + 1

objname = obj.name '獲取文字控制元件名稱,這裡可以根據名稱來判讀賦值,也可以根據其他屬性複製

obj.text = "文字" & i '文字框賦值

end if

next

2樓:匿名使用者

要定義為陣列為全域性變數,或者定義為_root.a;

還在注意賦值後要重新整理一次才會有顯示,可以在場景運動一幀,或者用

onenterframe這個函式,還不知道你要做成怎樣,可以的話留下聯絡方法............

3樓:匿名使用者

使用文字框控制元件陣列試試

4樓:匿名使用者

使用文字框陣列:

for i=0 to text1.uboundtext1(i).text="123"

next

5樓:狂族魔帝

for each fo in me.controlsif typename(fo)="textbox" thenfo.text=rnd ''''賦值

end if

next這樣?

6樓:匿名使用者

用控制元件陣列

for i=0 to ?

text(i).text="???"

next

7樓:施中

for i=1 to 10

txt(i)=........

next

vb中如何用雙迴圈制作豎立的稜形

戰國策 燕策二 此必令其言如迴圈,用兵如刺蜚繡。往復迴旋。指事物周而復始地運動或變化。意思是轉了一圈又一圈,一次又一次地循回。可以簡要地將基本思想表述如下 世界是按照極其漫長的時間週期,即所謂的 生成的大年 周而復始地永恆循回 這個週期因為過於漫長而實際上無法 但又不是完全確定的 在這個永恆迴圈的過...

在VB中如何簡化過多巢狀的if語句

何必用vb,直接操作就可以,選定a5到b100,假設100行資料,然後 編輯 定位 定位條件的空值,然後在編輯欄內輸入 最後按ctrl 回車即可 if b e 10 then s1 s1 1 elseif b e 20 thens2 s2 1 elseif b e 50 thens3 s3 1 el...

在vb中如何用sql語言在資料庫中建立表

下面是我用過的 用vb建立表 dmlsql create table fw calllog id integer identity 1,1 primary key,userid varchar 50 tdno varchar 50 callno varchar 50 calltime date,ca...