Discussion :

[hugo69]

Bonjour,

tout nouveau venu sur vb.net, je tente de passer mon appli access sur vb.net

Sur Access, dans les propriétés d'une combox box on a deux choses:

Une propriété "SOURCE", requete qui liste les éléments de la combo-box. (on met dans la premiere colonne du select la clé, et ensuite les éléments que lon souhaite afficher)

Une propriété "CONTROLE" qui dit sur quel champs agir de la source du formulaire.

Je tente desesperement, malgré mes recherches de faire un combo box sur une table "Clients". Le Combox Box doit afficher le champs libellé d'une table nationalité et doit fournir à la table client la clé étrangère de cette table nationalité. Si une valeur est déja dans la table client, le combo doit afficher le libellé correspondant present dans la table nationalité.

Un tutorial imagé peut etre?

Je crois qu'il faut utiliser des binding et autres, mais je ne men sort pas depuis plusieurs jours.

Merci.

[FRED.G]

Tu peux lier ta ComboBox à une source qui implémente IList. Pour cela tu définis la propriété DataSource (équivalent Access : RowSource, sauf qu'en DotNet, la source est un objet, en Access une chaine String correspondant au nom d'une table ou à une instruction SQL)

DisplayMember, c'est le nom d'une des colonnes de ta liste source, ou si tu préfères, le nom d'une des propriétés publiques des objets listés.

ValueMember, c'est la même chose, sauf que sert à indiquer quelle valeur sera liée (équivalent Access : Colonne Liée) et renvoyée par la propriété SelectedValue (équivalent Access : Value)

[JauB]

essaie de remplir un dataset par le résultat d'une requete select sur ta table Client. après tu spécifies ce DataSet comme valeur de la propriété DataSource de ton ComboBox.
après il y a deux propiétés de ton ComboBox : une pour la valeur afichée et une autre stockant par exemple l'ID du champ sélectionnée. à savoir que dans ta requête SQL tu dois avoir les deux champs: ID et LIBELLE.


Me.ComboBox1.DataSource=myDataSet.Tables(0)
Me.ComboBox1.DisplayMember="LIBELLE"
Me.ComboBox1.ValueMember="ID"

enfin j'espère t'avoir t'aider car j'ai pas fait les tests.
Bon Courage

[thierry007]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
public dtr as datarow 
public Ds as Dataset
public Cnx as OleDbConnection
public Da as OleDbDataAdapter
 
Public Class Connection
 
dim Cnx As OleDbConnection
 
Cnx= New OleDbonnection (String de connection a ta DB)
Cnx.Open
...
For Each dtr In Ds.TABLE
           ListBox.Items.Add(dtr.Item("ChampsTable"))
Next
...
End Class

Ceci est une façon aussi de remplir une listBox ou ComboBox

devrais aussi t'aider j'espère