Bonjour,
Dans mon Tabstrip j'ai actuellement un onglet (le 3) pour lequel je n'ai pas
d'info.
Donc lorsque je clique dessus, j'envoie un message avec une MsgBox pour dire
que cet onglet n'est pas disponible et je voudrais réactiver l'onglet 1
(c'est comme si je cliquais sur l'onglet 1)
Je ne trouve pas la syntaxe adéquate.
D'avance merci.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
X
Bonjour,
Schématiquement ça devrait fonctionner comme ça:
Dim indice As Byte Sub Load indice = 0 Call affiche_1 -------------
Sub TabStrip1_Click() indice = TabStrip1.SelectedItem.Index if indice = 0 Then: Call affiche_1 if indice = 1 Then: Call affiche_2 if indice = 2 Then: Call affiche_3 ' Caption = nom onglet.. -------------
Sub affiche_1 -------
Sub affiche_2 -------
Sub affiche_3 MsgBox "Cet onglet n°3 n'est pas disponible" Call affiche_1 --------------
*-*-*-*-*-*- Explications - Les 3 procédures "affiche_1, 2, 3", servent chacune respectivement au traitement de l'onglet invoqué. - Le Load envoie dans la première procédure au démarrage. - Le TabStrip1_Clich() sert à aiguiller selon l'index (onglet), vers les procédures après le lancement du programme...
----------------fin-------------
ECRIRE http://irolog.free.fr/ecrire/index.htm
LOGICIELS http://irolog.free.fr
SITE http://irolog.free.fr/joe/index.htm
FAQ VB http://faq.vb.free.fr
PRINCIPE D'UTILISATION DES NEWSGROUPS MICROSOFT http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm
----------------Fin----------------
"RENAUD Eric" a écrit dans le message de news: %
Bonjour, Dans mon Tabstrip j'ai actuellement un onglet (le 3) pour lequel je n'ai pas d'info. Donc lorsque je clique dessus, j'envoie un message avec une MsgBox pour dire que cet onglet n'est pas disponible et je voudrais réactiver l'onglet 1 (c'est comme si je cliquais sur l'onglet 1)
Je ne trouve pas la syntaxe adéquate. D'avance merci.
Bonjour,
Schématiquement ça devrait fonctionner comme ça:
Dim indice As Byte
Sub Load
indice = 0
Call affiche_1
-------------
Sub TabStrip1_Click()
indice = TabStrip1.SelectedItem.Index
if indice = 0 Then: Call affiche_1
if indice = 1 Then: Call affiche_2
if indice = 2 Then: Call affiche_3
' Caption = nom onglet..
-------------
Sub affiche_1
-------
Sub affiche_2
-------
Sub affiche_3
MsgBox "Cet onglet n°3 n'est pas disponible"
Call affiche_1
--------------
*-*-*-*-*-*-
Explications
- Les 3 procédures "affiche_1, 2, 3", servent chacune respectivement au
traitement de l'onglet invoqué.
- Le Load envoie dans la première procédure au démarrage.
- Le TabStrip1_Clich() sert à aiguiller selon l'index (onglet), vers les
procédures après le lancement du programme...
----------------fin-------------
ECRIRE
http://irolog.free.fr/ecrire/index.htm
LOGICIELS
http://irolog.free.fr
SITE
http://irolog.free.fr/joe/index.htm
FAQ VB
http://faq.vb.free.fr
PRINCIPE D'UTILISATION DES NEWSGROUPS MICROSOFT
http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm
----------------Fin----------------
"RENAUD Eric" <erenaud@fr.fm> a écrit dans le message de news:
%23oy692fuFHA.1032@TK2MSFTNGP12.phx.gbl...
Bonjour,
Dans mon Tabstrip j'ai actuellement un onglet (le 3) pour lequel je n'ai
pas
d'info.
Donc lorsque je clique dessus, j'envoie un message avec une MsgBox pour
dire
que cet onglet n'est pas disponible et je voudrais réactiver l'onglet 1
(c'est comme si je cliquais sur l'onglet 1)
Je ne trouve pas la syntaxe adéquate.
D'avance merci.
Dim indice As Byte Sub Load indice = 0 Call affiche_1 -------------
Sub TabStrip1_Click() indice = TabStrip1.SelectedItem.Index if indice = 0 Then: Call affiche_1 if indice = 1 Then: Call affiche_2 if indice = 2 Then: Call affiche_3 ' Caption = nom onglet.. -------------
Sub affiche_1 -------
Sub affiche_2 -------
Sub affiche_3 MsgBox "Cet onglet n°3 n'est pas disponible" Call affiche_1 --------------
*-*-*-*-*-*- Explications - Les 3 procédures "affiche_1, 2, 3", servent chacune respectivement au traitement de l'onglet invoqué. - Le Load envoie dans la première procédure au démarrage. - Le TabStrip1_Clich() sert à aiguiller selon l'index (onglet), vers les procédures après le lancement du programme...
----------------fin-------------
ECRIRE http://irolog.free.fr/ecrire/index.htm
LOGICIELS http://irolog.free.fr
SITE http://irolog.free.fr/joe/index.htm
FAQ VB http://faq.vb.free.fr
PRINCIPE D'UTILISATION DES NEWSGROUPS MICROSOFT http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm
----------------Fin----------------
"RENAUD Eric" a écrit dans le message de news: %
Bonjour, Dans mon Tabstrip j'ai actuellement un onglet (le 3) pour lequel je n'ai pas d'info. Donc lorsque je clique dessus, j'envoie un message avec une MsgBox pour dire que cet onglet n'est pas disponible et je voudrais réactiver l'onglet 1 (c'est comme si je cliquais sur l'onglet 1)
Je ne trouve pas la syntaxe adéquate. D'avance merci.
Titeuf [VB.Net 2005]
Cela doit marcher tiens moi au courant
If TabStrip1.Tabs(1).Selected Then 'ton code du 1er onglet ElseIf TabStrip1.Tabs(2).Selected Then 'ton code du 2ieme onglet ElseIf TabStrip1.Tabs(3).Selected Then TabStrip1.Tabs(1).Selected = True End If
C'est basic :) mais bon....
Cela doit marcher tiens moi au courant
If TabStrip1.Tabs(1).Selected Then
'ton code du 1er onglet
ElseIf TabStrip1.Tabs(2).Selected Then
'ton code du 2ieme onglet
ElseIf TabStrip1.Tabs(3).Selected Then
TabStrip1.Tabs(1).Selected = True
End If
If TabStrip1.Tabs(1).Selected Then 'ton code du 1er onglet ElseIf TabStrip1.Tabs(2).Selected Then 'ton code du 2ieme onglet ElseIf TabStrip1.Tabs(3).Selected Then TabStrip1.Tabs(1).Selected = True End If