＋设为首页 ＋添加到收藏夹
怎样在运行时改变combox文本框中的值为下拉列表中的另一项？
只让用户从下拉列表中选择，并且combox的text值又会随着另一控件的值的变化改变为combox列表中的某一项，怎么做？此时text已经为只读了，不能赋值！
先添加列表项，然后设置text 属性
key=combol1.list(combol1.listindex)
select case key
case 1,3,5,,7,8,11
for i=1 to 31
combol2.additem i
next
case 2
for i=1 to 29
combol2.additem i
next
case else
for i=1 to 30
combol2.additem i
end select
selectindex = 8
combobox.text=combobox.list(combobo.listindex)
各位弄错了，combo控件为DropdownList时，不是不能改变值，而是不能改为列表项中没有的值，所以，应该先执行combo1.additem "xxxx",然后执行combo1.text="xxxx"
这里，"xxxx"就是另外控件的值！
