| 发表于:2007-10-20 01:49:44 楼主 |
如题,listbox如下结构,有什么方法在listbox里面每行传递一个string的数据. aaaa bbbb 现在我要求,点aaaa返回"你选择了aaaa" 点bbbb返回"你选择了bbbb" listbox有个数组,list(0),list(1)... for i = 0 to 10 list(0).additem a(i) next for i = 0 to 10 list(1).additem a(i) next private sub list_click(index as integer) myindex = list(index).listindex msgbox a(myindex) end sub 注: 试过用 a="你选择了aaaa" myindex = list(index).listindex msgbox a(myindex)方式传递不得行 循环赋值时候,a的值如list(0)会被后面list(1)的值覆盖。 |
|
|
|
|