Hvordan får jeg værdien af dropdownlisten ud

Jeg har oprettet en dropdownlist på følgende måde:
Dim findsql As String = " select afdelingid,afdelingnavn from afdeling"
        Dim opfmdadap As New OleDbDataAdapter(findsql, forbindelse)
        Dim resultat As New DataSet
        opfmdadap.Fill(resultat, "Afdeling")
        DropDownList1.DataSource = resultat
        DropDownList1.DataValueField = "afdelingid"
        DropDownList1.DataTextField = "afdelingnavn"
        DropDownList1.DataBind()
        DropDownList1.Visible = True

når jeg prøver at få trukket værdien ud af feltet så får jeg kun den første værdi.
Jeg trækker den ud på følgende måde

afdelingid = DropDownList1.SelectedValue

hvorfor får jeg kun den første??
Hvordan får jeg sat værdien = med afdelingid??