UC知道VB这句赋值命令为什么说无效属性数组索引
来源：百度知道 编辑：UC知道 时间：2024/06/04 06:45:32
a() = Split(Text1.Text, vbCrLf)
For i = LBound(a) To UBound(a)
List1.List(i + 1) = a(i)
Next
都定义了，就List1.List(i + 1) = a(i)这句不行。为什么？
我知道这句，但有个缺点，就是总是在List最后一行加。我想让他从第一行开始。
For i = LBound(a) To UBound(a)
List1.List(i + 1) = a(i)
Next
都定义了，就List1.List(i + 1) = a(i)这句不行。为什么？
我知道这句，但有个缺点，就是总是在List最后一行加。我想让他从第一行开始。
list1中没有定义第i + 1项，所以是无效的索引。
如果想在第一行加新项，可以用这个
list1.additem a(i),0
List1.List(i + 1) = a(i)改成 list1.additem a(i)
除非你事先给list1做了i+1个item项才能用List1.List(i + 1)。要新加项得用additem