none
Programmation de la propriété DisplayMember d'un combobox RRS feed

  • Question

  • bonjour à tous,je souhaites programmer les propriétés datasource et displaymember d'un combobox à partir de plusieurs datasets tout au long d'une procédure.
    voici un bout de code.Comment définir la propriété displaymember du combobox?

    'Instanciation d'une objet connection

    ObjetConnection =

    New SqlConnection("Data Source=ABM-SOFT\SQLEXPRESS;Initial Catalog=SICESDWarehouse;Integrated Security=True")

    'Instanciation d'une objet Command

    ObjetCommand =

    New SqlCommand("SELECT * FROM BAREME1CATEGORIEA2", ObjetConnection)

     


    'Instanciation d'une objet DataAdapter

    Dim
    daGetBareme As New SqlDataAdapter(ObjetCommand)

    'Instanciation d'un dataset  

    Dim
    dsBareme As New DataSet

    'Charge le dataset

    daGetBareme.Fill(dsBareme,

    "BAREME1CATEGORIE")

    'la source du combobox et le dataset

    ComboBoxIndice.DataSource = dsBareme.Tables(

    "BAREME1CATEGORIEA2")

    mardi 12 janvier 2010 11:49

Réponses

Toutes les réponses

  • Bonjour

    Vous pouvez proceder de cette manière :

            Dim monDateset As New GBLDataSet
            Dim monDataAdapter As New SocieteTableAdapter
            Dim idSelected As Long
    
            monDataAdapter.Fill(monDateset.Tables("Societe"))
            cbxClient.DataSource = monDateset.Tables("Societe")
            cbxClient.DisplayMember = "LibelleLong"
            cbxClient.ValueMember = "Id"
    Rem : LibelleLong et Id sont des colonnes de ma table Societe.

    Il ne manque plus que configurer la propriété SelectedValue qui correspond à la valeur sélectionné par l'utilisateur.

    Cordialement,

    Mathieu
    Mathieu Francesch Sharplog Engineering
    mardi 12 janvier 2010 12:14
  • merci je vais essayer
    mardi 12 janvier 2010 12:16
  • voici le code qui a fonctionné

    ObjetConnection =

    New SqlConnection("Data Source=ABM-SOFT\SQLEXPRESS;Initial Catalog=SICESDWarehouse;Integrated Security=True")

    ObjetCommand1 =

    New SqlCommand("SELECT * FROM BAREME1CATEGORIEA2", ObjetConnection)

     

    Dim daGetBareme As New SqlDataAdapter(ObjetCommand1)

     

    Dim dsBareme As New DataSet

    daGetBareme.Fill(dsBareme,

    "BAREME1CATEGORIEA2")

    ComboBoxIndice.DataSource = dsBareme.Tables(

    "BAREME1CATEGORIEA2")

    ComboBoxIndice.DisplayMember =

    "CodeIndice"

    ComboBoxIndice.ValueMember =

    "CodeIndice"

    le nom de la table est BAREME1CATEGORIEA2, ayant deux champs " CodeIndice" et "Salaire"

    Je souhaites afficher la valeur"Salaire"  correspondant du champ "CodeIndice" dans un label dans la procédure.

    Quelqu'un a t-il une idée?
    mercredi 13 janvier 2010 07:00
  • salut

    je pense que du devrait d'abord te pacher sur la formulation de ta requete sql dans ton objetcommand1

    "select salaire from baremecategorie21 where codeindice="ce que tu veux"" et maintenant rouver omment l'afficher dans ton laleb


    amicalement
    mercredi 13 janvier 2010 13:07
  • Bonjour,

    Si vous souhaitez afficher le salaire dans votre combobox, il faut commencer par changer la ligne suivante :

    ComboBoxIndice.DisplayMember = "CodeIndice"

    par

    ComboBoxIndice.DisplayMember = "Salaire"

    Ets même remarque que mmw à l'exception prêt que dans la requête mais en écrivant la requête de cette manière :

    "Select salaire , CodeIndice from baremecategorie21 "

    Cordialement,

    Mathieu
    Mathieu Francesch Sharplog Engineering
    mercredi 13 janvier 2010 13:46
  • j'ai résolu le problème en ajoutant ce bout de code

    LblSalaire1.DataBindings.Add(

    "Text", dsBareme.Tables("BAREME1CATEGORIEA2"), "Salaire")

    • Marqué comme réponse Alex Petrescu jeudi 14 janvier 2010 08:36
    jeudi 14 janvier 2010 06:47