Combo1(0 - 5).ListIndex = 0 运行时提示无效控件数组索引

bing0705 发布于 2018-07-06 16:52， 1853 次点击

在窗体上放置了将近20个comboBox，Index也改成0,1,2...，想实现运行时comboBox默认显示第一项
Combo1(0).ListIndex = 0
Combo1(1).ListIndex = 0
Combo1(2).ListIndex = 0....
将近20个comboBox像上面这样写代码有点麻烦，改成Combo1(0 - 17).ListIndex = 0 运行就报错，提示无效控件数组索引，请各位看下怎么写代码方便些，谢谢！

只有本站会员才能查看附件，请登录

2 回复

ZHRXJR2018-07-06 18:14

循环呀，但前提是18个Combo1控件中都必须有项目存在，最起码有一个项目存在。
For I = 0 To 17
Combo1(I).ListIndex = 0
Next I

bing07052018-07-09 10:45

没有想到这一点，谢谢！非常感谢！