Visual Basic

   Public Function PostToWebUpdate(ByVal postData) As Boolean<br />
        Dim Client As WebClient<br />
        Try<br />
<br />
            Dim dataBytes As Byte() = Encoding.ASCII.GetBytes(postData)<br />
<br />
            Client = New WebClient<br />
            Client.Headers.Add("Content-Type", "application/x-www-form-urlencoded")<br />
            Dim returnedBytes As Byte() = Client.UploadData("http://www.mysite.com/folder/file.php", dataBytes)<br />
<br />
            Dim myResponse As String = New String(Encoding.ASCII.GetChars(returnedBytes))<br />
<br />
            Return myResponse = "SAVED"<br />
        Catch ex As Exception<br />
            MessageBox.Show("Error: PostToWeb: " & ex.Message)<br />
            Return False<br />
        Finally<br />
            Client.Dispose()<br />
            Client = Nothing<br />
        End Try<br />
    End Function

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