Imports System.Enum
Public Class Form1
    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) _
      Handles MyBase.Load
        Me.ComboBox1.DataSource = GetValues(GetType( _
        Beschaeftigungsverhaeltnisse))
        Me.Label1.Text = My.Settings.Beschaeftigungsverhaeltnisse
        Me.ComboBox1.SelectedValue = My.Settings.Beschaeftigungsverhaeltnisse
    End Sub
    Private Enum Beschaeftigungsverhaeltnisse
        Beamter
        Angestellter
        Arbeiter
    End Enum
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) _
      Handles Button1.Click
        My.Settings.Beschaeftigungsverhaeltnisse = _
        Me.ComboBox1.SelectedValue.ToString
    End Sub
End Class