如何用循环为名称结构为 T(m)_(n)控件赋值-Victor Duane
Access软件网QQ交流学习群(群号码198465573),欢迎您的加入!
首页 >技术文章> Access数据库-窗体/数据页


如何用循环为名称结构为 T(m)_(n)控件赋值

发表时间:2007/11/21 22:51:20 评论(1) 浏览(9016)  评论 | 加入收藏 | 复制
   
摘 要:如何用循环为名称结构为 T(m)_(n)控件赋值
正 文:

求助:如何用循环为控件赋值?

有 m x n 个CheckBox排列,名称结构为 T(m)_(n) ,请问如何用两重For为每一个控件赋初始值呢?

答:
Sub setIntvalue(frm As Form, m As Integer, n As Integer, Optional x As Boolean = True)
Dim ctl As String
Dim i As Integer
Dim j As Integer
For i = 1 To m
    For j = 1 To n
        ctl = "T(" & i & ")_(" & j & ")"
        frm.Controls(ctl).Value = x
      Debug.Print ctl, x
     Next
Next
End Sub

Access软件网交流QQ群(群号:198465573)
 
 相关文章
用VBA代码取得access表或查询的记录值,赋值给变量或控件  【zoutians  2008/2/1】
某控件不可用时,可直接赋值  【Askheart  2008/8/27】
将控件名赋值给组合框  【lymin  2009/8/8】
用with提高循环效率  【学习者  2012/4/2】
2012世界末日了吗?被玛雅人耍了吧--用For Each循环方式...  【麥田  2012/12/21】
【讲座视频】Access中VBA基础:分支和循环  【朱亦文  2013/2/25】
循环函数的应用  【在水一方  2013/4/13】
【Access示例】用代码修改表名称,用循环语句更改表名称,重命名...  【缪炜  2013/8/23】
常见问答
技术分类
相关资源
文章搜索
关于作者

Victor Duane

文章分类

文章存档

友情链接