作者icene (kkk)
看板Visual_Basic
标题Re: [VBA ] 同时控制多个物件求助
时间Thu Jan 25 22:24:29 2007
※ 引述《zybaster (小赛)》之铭言：
: 请问一下,
: 如果想以do loop来一次控置相似名称之物件的属性
: ex.有text1 text2...text10
: 如果其中之一的isnull属性为ture,使对应的visible属性为false
: 有办法用回圈来一次运算嘛?
这是你要的吗？
Dim contrl As Control
i=0
For Each contrl In Me.Controls
If TypeName(contrl) = "CheckBox" Then
i = i + 1
contrl.Caption = chart_rng.Offset(-1, i)
'checkbox tabindex 3 ~ 13
If contrl Then ck(i) = 1 '有打勾 就是1
End If
Next contrl
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 61.216.103.66