Discussion :

[jpg75014]

Bonjour tout le monde,

Je souhaiterais changer les index des TabPages de mon TABCONTROL1 selon la position de la souris (par exemple sur un événement MouseUp)

Attention TABCONTROL1 a la propriété Multiline à TRUE.

Merci beaucoup pour votre aide.

JP

[anonymousse]

Est-ce que je comprends bien ton besoin c'est de pouvoir modifier l'ordre d'affichage de tes Tabpages ?

Essaies le code suivant dans le traitement de l'évènement que tu choisis :

Code :

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

1
2
3
4
Dim IndexTP1 As Integer = TabControl1.TabPages.IndexOf(nameTP1)
                Dim IndexTP2 As Integer = TabControl1.TabPages.IndexOf(nameTP2)
                TabControl1.TabPages(IndexTP1) = nameTP2
                TabControl1.TabPages(IndexTP2) = nameTP1

(Il est peut-être nécessaire de traiter l'existence des Tabpages concernés avant)

[Graffito]

On peut faire ainsi:
- créer une liste de TabPages,
- ajouter à la liste toutes les TabPage du tabControl,
- supprimer toutes les pages du TabControl,
- ajouter au tabControl toutes les pages de la liste dans l'ordre choisi.