Ottenere il valore attribuito a una chiave della Collection

Mostriamo la modalità per ottenere il valore attribuito a una chiave della Collection:

Public Sub Form_Open()

 Dim cl As Collection = ["chiave_1": "valore 1", "chiave_2": 1234, "chiave_3": Color.Red]

 Print cl["chiave_1"], cl["chiave_2"], Hex(cl["chiave_3"])

End