Modifier un item d'une combobox lors de sa selection [Résolu]
Patrick0217058
Messages postés dimanche 27 mars 2011Date d'inscription
28 juin 2016
Dernière intervention
-
21 mai 2015 à 09:50 - Dernière réponse : Patrick0217058
Messages postés dimanche 27 mars 2011Date d'inscription
28 juin 2016
Dernière intervention
- 21 mai 2015 à 17:56
Je suis parti dans un truc pour avoir l'index qui fonctionne
Dim index As Integer
'index = ComboBox1.FindString("Objet1")
'ComboBox1.SelectedIndex = index
'Button1.Text = index ' Vérifie la récupération de l'index.
Après c'est la panne sèche sauf une petite bidouille fonctionnel:
ComboBox1.Items.Remove("Objet1") ComboBox1.Items.Add("Objet1 Selectionner")
Si vous avez une solution et un exemple de code pour la solution avec le combobox.remplace("Objet1","Objet1 Selectionner")
vous pouvez m'en faire part.
Je vous remercie pour l'intérêt que vous prenez à mon problème.
le code, c'est comme le français : tous deux demandent de la rigueur, si l'on veut éviter des non-sens (le verbe avoir n'est pas le verbe être et ces deux verbes ont des sens très différents ... Es-tu certain de ne pas avoir voulu écrire "je nez" pas su ... .. pendean que tu y aies ... ?)
Montre comment tu as tenté de l'utiliser !
________________________
Nul ne saurait valablement coder ce qu'il ne saurait exposer clairement.
Réponse a votre message "ucfoutu", "Je n'ai pas su utiliser votre code". Si rien que cela peut vous faire plaisir.
_____________________________________________________
Voici le code que j'ai essayé :
If ComboBox1.SelectedItem = "Objet" Then
Dim selectionIndex As Integer
selectionIndex = ComboBox1.SelectedIndex
Dim selectionItem As Object
selectionItem = ComboBox1.SelectedItem
selectionItem = "Objet Selectionner"
Je n'arrive pas à modifier ma combobox1 par-contre quand je fais le test avec un messageBox ça fonctionne (La modification s'effectue dans le messageBox.
Je rappelle que moi je veux la modification dans la combobox.
If ComboBox1.SelectedItem = "Objet1" Then
Dim selectionItem As Object
selectionItem = ComboBox1.SelectedItem
selectionItem = "Objet1 Selectionner"
ComboBox1.Items(ComboBox1.SelectedIndex) = selectionItem
End If
