Keys Method |
Description
Returns an array containing all existing keys in a Dictionary object.
PowerBASIC Syntax
Return Value
VARIANT. Array of keys.
Example [PowerBASIC]
#INCLUDE "windows.inc" #INCLUDE "scrrun.inc"
DIM pDic AS IDictionary DIM vKey AS VARIANT DIM vItem AS VARIANT DIM vKeys AS VARIANT DIM i AS LONG
' Create an instance of the Dictionaty object pDic = NEWCOM "Scripting.Dictionary" ' Add some key/item pairs to the dictionary vKey = "a" : vItem = "Athens" pDic.Add vKey, vItem vKey = "b" : vItem = "Belgrade" pDic.Add vKey, vItem vKey = "c" : vItem = "Cairo" pDic.Add vKey, vItem ' Get all the keys in the collection vKeys = pDic.Keys ' Display them REDIM vArray(0) AS VARIANT vArray() = vKeys FOR i = LBOUND(vArray) TO UBOUND(vArray) PRINT VARIANT$(vArray(i)) NEXT
|