Imports System

Imports System.Collections

Imports System.Collections.Specialized

Public Module Module1

    Public Sub Main()

        Dim myCol As New NameValueCollection()

        myCol.Add("red", "rojo")

        myCol.Add("green", "verde")

        myCol.Add("blue", "azul")

        myCol.Add("red", "rouge")

        Console.WriteLine(myCol("red"))

    End Sub

End Module