有10个checkbox,怎么用一个循环遍历?

Question

我form上有10个checkbox,分别是check1到check10,我想全部设置其宽带=100，怎么设?
比如:  Dim checki As CheckBox
  i = 1
  Do While i <= 15
    checki = "Check" & i   '这行语法错误
    Checki.Width = 100
  Loop这段语法是错的,正确的是?

Answer 1

用checkbox数组，遍历起来就很方便了。

Answer 2

Do While i <= 15
    me("Check" & i).Width = 100
  Loop