主题:如何对多个text赋值
xch2000
[专家分:0] 发布于 2008-11-29 17:33:00
不是要一个一个赋吧,TEXT1.TEXT=0写几十次?
回复列表 (共2个回复)
沙发
pariszh [专家分:740] 发布于 2008-11-29 17:54:00
你可以用控键数组
板凳
pariszh [专家分:740] 发布于 2008-11-29 17:55:00
还有一中方法,如果不是控件数组可以这样
Dim TX As Control
Dim i As Integer
For i = 1 To 10
Set TX = Me.Controls("text" & i)
TX.Text = i
Next i
我来回复