Combo Box múltiple en Visual Studio

A esto me refiero con un combo que tenga dos elementos ejemplo el código y la descripción, que se muestre solo la descripción y obtengamos el código de esa selección.
Lo primero que hacemos es definir una nueva clase en nuestro proyecto Ej. ClassComboMultiple, el cual tiene un value y una descripción (adjunto el codigo):

Public Class ClassComboMultiple
    Public Value As Object
    Public Description As String

    Public Sub New(ByVal NewValue As Object, ByVal NewDescription As String)
        Value = NewValue
        Description = NewDescription
    End Sub

    Public Overrides Function ToString() As String
        Return Description
    End Function
End Class

Una vez armado esto (en mi caso los valores son obtenidos de una tabla de un sqlce) solo tenemos que cargar los datos:

        vL_ConexionMobil = New SqlCeConnection(vL_ArchivoMobil)
        StrSql = "Select * from " & NombreTabla
        MobilDataAdapter = New SqlCeDataAdapter(StrSql, vL_ConexionMobil)
        Dim MobilTable As New DataTable
        MobilDataAdapter.Fill(MobilTable)
        For Each row As DataRow In MobilTable.Rows
            FrmVenta.ComboBox1.Items.Add(New ClassComboMultiple(row.Item("Codigo"), row.Item("Razon").ToString))
        Next

Y listo esto cargara en nuestro combo box los datos.
Para mostrar el dato seleccionado solo debemos hacer:

Me.CodigoCliente = CType(ComboBox1.SelectedItem, ClassComboMultiple).Value

Espero que les sirva.