[VB2005] COMBOBOX et BDD

Version imprimable

10/12/2006, 22h48
philguio

[VB2005] COMBOBOX et BDD

Bonjour
Voila je suis debutant en vb 2005.
Je suis en train de faire une application gerant une base de donnée access et une feuille excel. ma question est la suivant je cherche a remplir mes combobox avec les colonnes access

merci de me donner un petit coup de main car je " patoge".
@
Philippe
10/12/2006, 23h19
ouskel'n'or

Bonjour philguio, bienvenue sur le forum. As-tu fait une recherche sur le forum VBA avec "Access & Excel" comme mots clé ?
Regarde déjà là http://www.developpez.net/forums/sho...t=Access+Excel
Mais il y a de nombreuses réponses ;)
A+
19/12/2006, 17h41
philguio

et maintenant!!!

bonjour,
voila je commence a sortir un peut la tete de l'eau, mes combobox ce remplisse avec ce que je veut, par contre je veut récuperer la valeur le la liste du combo. Pour le moment je récupére la valeur dans une textbox,mais le text ne change pas quand je choisi un autre nom sur le combo

merci de me montret le début du chemin

@
Philippe
19/12/2006, 17h50
ouskel'n'or

Code:

LaVal = ComboBox1.list(ComboBox1.listindex)

A+
19/12/2006, 19h11
philguio

Erreur 1 'list' n'est pas un membre de 'System.Windows.Forms.ComboBox'.

et idem pour listindex

je ne comprend pas bien ce qu'il faut ajouter

voila ce que j'ai essayé

Dim LaVal As String

LaVal = ComboBox1.list(ComboBox1.listindex)

merci
@
Philippe
19/12/2006, 19h12
philguio

et derriere

j'ai ajouté TextBox1.Text = LaVal

@+

Je sais pas si c'est ça que tu cherche, mais voilà le code:
Code:

1 2 3 Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged TextBox1.Text = ComboBox1.SelectedItem.ToString End Sub
Ici à la place du textbox.text tu peut utiliser ta variable LaVal. ;)

je coris que vous chercher ce code:
dans la form ou se trouve ton combobox1 tu vas ajouté ce code dans form1_load pour remplir ton combobox1 par les elements d'une table access:
Code:

1 2 3 4 5 6 7 8 9 10 11 connect.open dim cmd as sqlcommand = new sqlcommand("select Nom form Etudiant",connect) dim read as sqldatareader = cmd.executereader combobox1.items.clear if (read.hasrowsx) then while read.read combobox1.item.add(read?getvalue(0)) end while end if read.close connect.close