Sets a key in a Dictionary object.
Visual Basic |
---|
Public Property Key( _ ByRef Key As Variant _ ) |
var d; d = new ActiveXObject("Scripting.Dictionary"); function AddStuff() { var a; d.Add("a", "Athens"); d.Add("b", "Belgrade"); d.Add("c", "Cairo"); } function ChangeKey(oldkey, newkey) { var s; d.Key("c") = "Ca"; s = "Key " + oldkey + " changed to " + newkey; return(s); }
Function DicDemo Dim d ' Create some variables. Set d = CreateObject("Scripting.Dictionary") d.Add "a", "Athens" ' Add some keys and items. d.Add "b", "Belgrade" d.Add "c", "Cairo" d.Key("c") = "d" ' Set key for "c" to "d". DicDemo = d.Item("d") ' Return associate item. End Function