Discussion :

[ygeeg]

Bonjour,

Est ce que c'est possible d'avoir un séparateur dans un ComboBox ? si oui merci de m'indiquer comment.

exemple de combobox:

item1
item2
_______
item3
item ..
item n

Merci d'avance.

[leeloo95]

tu veux un séparateur de ligne?
exemple:

Voiture
Moto
_________(séparateur)
camion
poussette
_________(séparateur)
roller
...

Et dans quelle condition tu veux ton séparateur?

[ygeeg]

Oui, c'est exactement comme dans ton exemple.
Le combobox doit afficher en premier "par exemple" France, Belgique, Espagne + séparateur + Les autres pays en ordre alphabétique.

Merci.

[leeloo95]

Une dernière question comment charges tu ta combobox? BDD? Objet? A la main?

[ygeeg]

BD (sql server)

[leeloo95]

je connais pas la synthaxe exact pour Sql Server mais voila comment je ferais, en espérant que cela t'aide :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
'chargement de la combobox des intervenants
        opendb()
        Dim req1 As OleDb.OleDbCommand = connexion.CreateCommand()
        req1.CommandText = "Select I.Num_intervenants from INTERVENANTS I, TYPE_INTERVENANTS TI" & _
        " where I.Num_type_intervenants = TI.Num_type_intervenants" & _
        " and TI.Num_type_intervenants = 2 "
        Dim myreader1 As OleDb.OleDbDataReader = req1.ExecuteReader()
        Do While myreader1.Read()
            cb_intervenants.Items.Add(myreader1.GetValue(0))
            cb_intervenants.Items.Add("______ séparateur")
        Loop
        closedb()
        myreader1.Close()
        'Fin chargement de la combobox des intervenants

Une ligne sur deux je me retrouve dans ma combobox avec mon "_______séparateur", ce qui me donne :

toto
________séparateur
titi
________séparateur
tutu
________séparateur

[ygeeg]

Merci pour la réponse.

Ce que je fais, c'est de remplir mon combobox depuis une table dans la BD (sql server)

Code :

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

1
2
3
4
5
   ds.Clear()
        daPays.Fill(ds, "country")
        For i = 0 To ds.Tables("country").Rows.Count - 1
            ComboBox2.Items.Add(ds.Tables("country").Rows(i)(2))
        Next

Après ?
Malheureusement, je ne sais toujours pas où je vais ajouter le séparateur (un seul après le 1er nom :

nom1
_____
Les autres noms ici

[leeloo95]

Tu rajoute un If comme ceci :

Code :

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

1
2
3
4
5
6
7
8
ds.Clear()
        daPays.Fill(ds, "country")
        For i = 0 To ds.Tables("country").Rows.Count - 1
            if i = 0 then
            ComboBox2.Items.Add(ds.Tables("country").Rows(i)(2))
            Combobox2.items.add("TON SEPARATEUR")
    else : ComboBox2.Items.Add(ds.Tables("country").Rows(i)(2))
        Next

[ygeeg]

Merci beaucoup pour l'aide, leeloo95.

[alex_vino]

Oui mais ce serait quand même mieux que l'on ne puisse pas sélectionner ton séparateur

[leeloo95]

effectivement, sa peut poser problème !!!

Oubli pas de rajouter une condition si ton Séparateur est sélectioné.

[ygeeg]

Bonjour,

Ah oui, je vais ajouter alors une condition au cas où il est sélectionné.

Merci alex_vino et leeloo95 pour la notification.

[alex_vino]

Pour bien faire ygeeg il faudrait que quand ta souris passe dessus l'Item ne se met pas en surbrillance, un peu comme on peut le voir sur certains sites web et facilement réalisable en HTML.