Griser une ligne d'une list box

Bonjour Superman,
Superman a écrit :

Bonjour,

J'aimerais savoir si il est possible de griser (de ne pas pouvoir
utiliser) une ligne d'une listbox

Exemple :

Tomate
Fraise //Griser ou faire en sorte que cette ligne ne soit pas
cliquable
Pates


Merci

Avec une ListBox, je ne sais pas. Par contre avec un ListView, on peut
utiliser la propriété ForeColor, et/ou Ghosted d'un Item (Ghosted n'a
d'effet visuel que sur l'icône associée à l'item, et nécessite donc un
contrôle ListImage lié au ListView). Ces 2 contrôles se trouvent dans
Microsoft Windows Common Controls 6.0

Exemple de code :

Option Explicit

Private Sub Form_Load()
With Me.ListView1
.View = lvwReport
.ColumnHeaders.Add
.HideColumnHeaders = True
.LabelEdit = lvwManual
.SmallIcons = Me.ImageList1
.ListItems.Add , , "Tomate", , 1
.ListItems.Add , , "Fraise", , 1
.ListItems.Add , , "Pates", , 1
End With
Me.ListView1.ListItems(2).Ghosted = True
Me.ListView1.ListItems(2).ForeColor = vbGrayText
End Sub

Private Sub ListView1_Click()
If Me.ListView1.SelectedItem.Ghosted = True Then
Me.ListView1.ListItems(Me.ListView1.SelectedItem.Index).Selected =
False
Set Me.ListView1.SelectedItem = Nothing
End If
End Sub

Résultat :

<http://cjoint.com/?kqreI232Rq>

--
Cordialement,

Jacques.

--
Cordialement,

Jacques.