listbox不能用代码全选？解决方法

2013-01-01

listbox不能用代码全选？longilb_1.ExtendedSelectTRUEfori1tolb_1.TotalItems()lb_1.SelectItem(i)next

listbox不能用代码全选？
long   i

lb_1.ExtendedSelect   =   TRUE
  for   i   =   1   to   lb_1.TotalItems()
  lb_1.SelectItem(i)
next

执行后，没有选择任何项目
[解决办法]
mutilselect模式下用setstate方法
long  i

lb_1.ExtendedSelect  =  TRUE
for  i  =  1  to  lb_1.TotalItems()
  lb_1.SetState (i,true )
next