This is how I'm binding my combobox:

Code:
    Public Sub carregaPais()
        Me.ComboPais.DataSource = AbreDataSet("Select * from Paises", "Pais")
        Me.ComboPais.DisplayMember = "Pais"
        Me.ComboPais.ValueMember = "IDPais"
    End Sub


    Function AbreDataSet(ByVal strSQL As String, ByVal Tabela As String) As DataSet
        Dim ds As DataSet
        Dim DataAdapt As Odbc.OdbcDataAdapter
        Dim conn As New Odbc.OdbcConnection(sConnString)

        DataAdapt = New Odbc.OdbcDataAdapter(strSQL, sConnString)
        ds = New DataSet()
        conn.Open()

        DataAdapt.Fill(ds, Tabela)
        Return ds
        ds = Nothing
    End Function
My combo returns this error:
Cannot bind to the new value member.
Parameter name: value

What am I doing wrong?
Thank you.