Excel VBA 及vb6中 爲Listbox列錶框設置ItemData的方法

 註意VBA 及vb6中 列錶框的新添加的項目的索引爲 List1.NewIndex

以排序順序將相應的項目填充列錶框 List1 和 ItemData 數組.
   List1.AddItem "Judy Phelps"
   List1.ItemData(List1.NewIndex) = 42310
   List1.AddItem "Chien Lieu"
   List1.ItemData(List1.NewIndex) = 52855
   List1.AddItem "Mauro Sorrento"
   List1.ItemData(List1.NewIndex) = 64932
   List1.AddItem "Cynthia Bennet"
   List1.ItemData(List1.NewIndex) = 39227