Visual Basic

Public Function adminlevel() As Dataset<br />
        Dim adminsql As String = "Select * from userlevel"<br />
        Dim admindata As New SqlClient.SqlDataAdapter(adminsql, con)<br />
        Dim adminset As New DataSet<br />
        con.Open()<br />
        If con.State = ConnectionState.Open Then<br />
            admindata.Fill(adminset, "userlevel")<br />
           <br />
                admlevel = adminset.Tables("userlevel")<br />
           <br />
                  con.Close()<br />
            'Catch ex As Exception<br />
            '    MsgBox(ex.Message)<br />
            'End Try<br />
        Else<br />
            MsgBox("No Connection")<br />
        End If<br />
        Return admintable<br />
    End Function<br />
<br />
<br />
//at form end I have following code to bind combo box cboUser to a databse field.Stepping thru the code  line cbouser.displaymember="levelname" returned the error after the code.<br />
<br />
 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load<br />
        Try<br />
            Dim myuserlevel As New Underwriter.Underwriter<br />
            Dim load As New DataTable<br />
            load = myuserlevel.adminlevel()<br />
            cboUser.DataSource = load<br />
            cboUser.DisplayMember() = "levelName"<br />
            cboUser.ValueMember() = "levelname"<br />
        Catch ex As Exception<br />
            MsgBox(ex.Message)<br />
        End Try<br />
<br />
    End Sub<br />
<br />
the error returned is below:<br />
Could not bind to the new display member <br />
Parameter: newDisplayMember