Which type does Collection object accept?

[manzoor]

Hi,

Why does the followin code says "Type missmatch "?

If c.Container.Caption = "Info" Then
If TypeOf c Is ComboBox Then valColl.Add (c.Text), c.Index
If TypeOf c Is label Then labelColl.Add c.Caption, c.Index
If TypeOf c Is TextBox Then valColl.Add c.Text, c.Index
End If
Next c


These follwing 3 lines give the error "Type missmatch"

If TypeOf c Is ComboBox Then valColl.Add (c.Text), c.Index
If TypeOf c Is label Then labelColl.Add c.Caption, c.Index
If TypeOf c Is TextBox Then valColl.Add c.Text, c.Index


Thanks

[Joacim Andersson]

The second argument to the Add method of a Collection object is the Key.
Key must be a string. You're adding the Index of the object.
You must explicitly change that to a string

If TypeOf c Is ComboBox Then valColl.Add (c.Text), [b]CStr(c.Index)[/b]

Or use the Index argument of the collection object which is the third argument of the Add method.

Best regards

[manzoor]

Thanks Joacim Andersson
it worked !