odi*_*seh 0 vb6 combobox recordset
在VB6.0中,MyCombobox.NewIndex的最大值是多少?它是什么数据类型的?为什么我不能将newIndex设置为11001000000?如果我不能,我该怎么办?
谢谢
Dim ComboItem As String
With rsTest
.Sort = "ID Asc"
.MoveFirst
While Not .EOF
ComboItem = .Fields("Code") & " - " & .Fields("Name")
myCombobox.AddItem (ComboItem)
myCombobox.ItemData(myCombobox.NewIndex) = .Fields("ID")
.MoveNext
Wend
End With
Run Code Online (Sandbox Code Playgroud)
根据帮助,.NewIndex是一个只读属性,它返回最后添加的项目的索引并设置它是没有意义的.
由于它是一个整数,其最大(可用)值为32767.当您将第32769项添加到组合框时,索引将换行为负值,并且不能再使用.
要将任意数据分配给项目,请使用.ItemDataLong属性,并且可以保存介于-2,147,483,648和2,147,483,647之间的整数值.