Office中国论坛/Access中国论坛

标题: 怎样才能简单地给几十个Checkbox控件的value赋值? [打印本页]

作者: beam2003 时间: 2004-10-8 03:10
标题: 怎样才能简单地给几十个Checkbox控件的value赋值?
怎样才能简单地给几十个Checkbox控件的value赋值?

怎样可以给名称符合一些条件的CHECKBOX赋值,如像CheckBox1、CheckBox3、CheckBox5...等序号为奇数的Value赋值为Ture,偶数的赋值为False?

作者: tanjh 时间: 2004-10-12 04:29
dim i as integer

dim k as integer

for i=1 to 15 step 2

me.controls("checkbox" & i)=true

next

for k=2 to 14 step 2

me.controls("checkbox" & k)=false

next[em05]

[此贴子已经被作者于2004-10-11 20:29:13编辑过]

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)