Questa funzione mostra come si possa valorizzare una combobox assegnandole i valori di una enum.

    ''' Carica una combo da una enum
    ''' 
    ''' Combo da caricare
    ''' Oggetto del tipo della enum
    ''' 
    Public Sub CaricaComboDaEnum(ByRef paCmb As ComboBox, ByVal paEnum As System.Enum)

        'Controllo che l'oggetto sia una enum
        If paEnum.GetType.BaseType.FullName = "System.Enum" Then
            'Dichiaro un tipo per sfruttarne i metodi
            Dim typeEnum As Type

            'Assegno al mio tipo generico il tipo della enum
            typeEnum = paEnum.GetType

            Dim loElementi() As String = [Enum].GetNames(typeEnum)

            paCmb.Items.Clear()
            For Each elem As String In loElementi
                paCmb.Items.Add(elem)
            Next
        End If
    End Sub