Question

VB中,显示 实时错误‘35602’集合中的关键字不唯一 错误,代码如下：

Answer 1

没看到代码。这个错误是说，一组集合中的项（比如一个listview中的所有listItem），Key值不能重复，而你设定的值中有重复。

追问

Private Sub Form_Activate()
Me.TreeView1.ImageList = Me.ImageList1
TreeView1.LineStyle = 0
Dim nodX As Node
Set nodX = TreeView1.Nodes.Add(, , "First", "系统设置", "a")
Set nodX = TreeView1.Nodes.Add("First", tvwChild, , "会员消费规定", "b")
Set nodX = TreeView1.Nodes.Add("First", tvwChild, , "会员类型设置")
没找到有重复的，请教

追答

错误报在哪一行代码上？还是imageList中各个图片的key值有重复？

追问

Set nodX = TreeView1.Nodes.Add(, , "First", "系统设置", "a") 错误报在这一行，imageList中各个图片的key也没有重复。

追答

在别的程序段或TreeView1的属性设置中，已经有key值为“First”的节点。

追问

换成别的key值也不行，还是出错，我想的都试着改过了，就是出错，无语了。。。
谢谢你的回答。

追答

也可能是那个imageList里的“a ”不唯一