chargement du combobox

Question

SVP je veux charger mon combobox à partir de ma base de données(SQL server management studio)en vb.net et j'utilise visual basic 2008 et je veux que la l'id de cette table m'afiiche sur mon combo box 
MErci

Mayzz · Answer

S'il te plais va faire une recherche.

Merci


Si le déboguage est l'art d'enlever les bogues, la programmation doit être l'art de les créer.

kaoutar90 · Answer

c'est déjà mais RIEN !!

cs_TIKATKT · Answer

Salut 
Voici un petit bout de code qui pourra t'aider :
 
        With ComboBox1
            .DataSource = "Select Id, Nom from Table1"
            .DisplayMember = "Nom"
            .ValueMember = "Id"
            .SelectedIndex = -1
        End With


Bonne journée

Mayzz · Answer

@TIKATKT> Ton code n'est pas bon, on ne met pas de requête à la propriété DataSource.

@kaoutar90> Quand tu dis avoir recherché tu te moque de moi j'espère ? Parce que des messages comme le tien il y en a 30 par semaine, il suffit de saisir "Combobox données VB" pour trouver ce que tu veux. Si t'as la flemme on ne le fera pas pour toi !




Si le déboguage est l'art d'enlever les bogues, la programmation doit être l'art de les créer.

cs_TIKATKT · Answer

Oui, tu as raison Mayzz !! merci pour la remarque :)
en fait, voici le bon code :


        Dim Con As New SqlConnection(TaChaineDeConnexion)
        Dim ds As New DataSet

        str = "Select Id, Nom from Table1"

        Dim da As New SqlDataAdapter(str, Con)
        da.Fill(ds, "Table1")

        With ComboBox1
            .DataSource = ds.tables("Table1")
            .DisplayMember = "Nom"
            .ValueMember = "Id"
            .SelectedIndex = -1
        End With


Voilà !!
Bonne journée à tous

glodylmg · Answer

Bonjour essai avec ce code

  Private Sub ComboBox2_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox2.SelectedIndexChanged

               RstParent.Open("SELECT *from dbo.Parent where Idpar='" & (ComboBox2.Text) & "'", connexion, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic)
        TextBox8.Text = ""
               Do While RstParent.EOF = False
            TextBox8.Text = (RstParent("Nompar").Value)
            RstParent.MoveNext()
        Loop
        RstParent.Close()

    End Sub

ucfoutu · Answer

Bonjour, glodylmg,
Ta réponse est complètement "à côté de la plaque" !!!!
Tu ne sembles pas avoir compris la question.

Chargement du combobox

7 réponses

Votre réponse

Discussions similaires