SVP recuperer valeur des champs SQL VB ACCESS

Bonjour,


comment puis-je recuperer le resultat d'une requête SQL dans un TextBox

j'ai deux textBox : ID_Reservation et ID_Chambre
je chercher le ID_Chambre a partir de ID_Reservation ( tous les deux se trouvent dans une table Gh_Reservation )


voila ma requête :

        Dim ds As System.Data.DataSet 
        Dim sql As String 
        Dim cs As String 
        Dim cnx As System.Data.OleDb.OleDbConnection 
        Dim cmd As System.Data.OleDb.OleDbCommand 
        Dim x,y As Integer 

        'creation du DataSet 
        ds = New System.Data.DataSet() 

        'chaine de connexion 
        cs = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=D:\bd_Hotel1.accdb" 

        'la connexion 
        cnx = New System.Data.OleDb.OleDbConnection 
        cnx.ConnectionString = cs 
        cnx.Open() 
        'la commande 

        cmd = New System.Data.OleDb.OleDbCommand 
         
        sql = "SELECT ID_Chambre AS '" & y & "' FROM Gh_Reservation WHERE ID_Reservation = '" & x & "'" 

        ID_Chambre.Text = y

dans le ID_Chambre je recois tjrs la valeur 0

comment ca marche !