[已解决]VBA listbox 求助

niuniu2389 · 发表于 2013-6-19 13:59

Dim R(15) As String
ListBox1.ColumnCount = 15
R(0) = "编号"
R(1) = "年度"
R(2) = "乡镇"
R(3) = "村"
R(4) = "项目类别"
R(5) = "项目"
R(6) = "计划金额"
R(7) = "结余金额"
R(8) = "计划文号"
R(9) = "资金类别"
R(10) = "是否变更"
R(11) = "变更项目"
R(12) = "变更金额"
R(13) = "变更结余"
R(14) = "变更依据"
R(15) = "备注"

ListBox1.AddItem

ListBox1.List(0, 0) = R(0)
ListBox1.List(0, 1) = R(1)
ListBox1.List(0, 2) = R(2)
ListBox1.List(0, 3) = R(3)
ListBox1.List(0, 4) = R(4)
ListBox1.List(0, 5) = R(5)
ListBox1.List(0, 6) = R(6)
ListBox1.List(0, 7) = R(7)
ListBox1.List(0, 8) = R(8)
ListBox1.List(0, 9) = R(9)

ListBox1.List(1, 10) = R(10)
ListBox1.List(0, 11) = R(11)
ListBox1.List(0, 12) = R(12)
ListBox1.List(0, 13) = R(13)
ListBox1.List(0, 14) = R(14)
ListBox1.List(0, 15) = R(15)
End Sub
为什么一到"ListBox1.List(1, 10) = R(10) "就会出现无效属性值呢?难道这个列表框只能设10列吗?
请教了

最佳答案

月排行榜 / 总排行榜

hwc2ycy

2013-6-19 14:17

对，可以突破。

跳转到最佳答案楼层