hvorfor virker min dropdownlist ikke

Jeg har en dropdownlist som jeg prøver at fylde med data fra en database. jeg får ikke de data frem som jeg ønsker, istedet får jeg: system.data.common.dbdata. her er koden hvad gør jeg galt

Sub fyldden()
Dim strsql As String = "select Opfmd from Opfoelg where Opfid = 1"
        Dim objcmd As New OleDbCommand(strsql, forbindelse)
        forbindelse.Open()
        DropDownList1.DataSource = objcmd.ExecuteReader()
        DropDownList1.DataBind()
        forbindelse.Close()
end sub

forbindelsen bliver erklæret højere oppe og den virker.

opfid = 1 skal give minimum 4 poster i min dropdownliste.