1. #1
    Membre du Club
    Homme Profil pro
    Enseignant
    Inscrit en
    mars 2017
    Messages
    76
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations professionnelles :
    Activité : Enseignant
    Secteur : Enseignement

    Informations forums :
    Inscription : mars 2017
    Messages : 76
    Points : 54
    Points
    54

    Par défaut utilisation de l'Event Enter dans un TabPage

    Bonjour,
    J'ai créé plusieurs TabPage dans un TabControl.
    Lorsque je clique sur l'onglet d'un TabPage.Enter je souhaite exécuter un certain nombre d'instructions, or elles ne produisent pas le résultat escompté. Par contre si je place le même code dans un Button et que je clique dessus tout se déroule normalement.

    Voici mon code dans le TabPage.Enter
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
     
    Private Sub TabPageCorporellesCapitauxImmo_Enter(sender As Object, e As System.EventArgs) Handles TabPageCorporellesCapitauxImmo.Enter
                Me.DataGridView_Corporelles.DataSource = MonViewImmobilisations 'Je charge un DataGridView à partir d'un DataView d'un Dataset 
                'là pas de problème le travail se déroule normalement
    'Avec le code suivant, je renseigne une colonne du DataGridView qui n'est pas liée au DataView (donc colonne vide au départ). 
    'J'effectue un calcul en balayant toutes les lignes du DataView et je veux placer le résultat dans la colonne vide "Résiduelle_DGVCorporelles" du DataGridView.
    'La boucle s'effectue normalement mais rien n'apparaît dans la colonne 
                If MonViewImmobilisations.Count > 0 Then
                    For X = 0 To MonViewImmobilisations.Count - 1
                        DataGridView_Corporelles("Résiduelle_DGVCorporelles", X).Value = MonViewImmobilisations(X)("Valeur") - MonViewImmobilisations(X)("Amortissement")
                    Next
                End If
    End Sub
    Par contre, le même code placé dans un Button fonctionne parfaitement et la colonne "Résiduelle_DGVCorporelles" du DataGridView est bien remplie avec les bonnes valeurs

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
     
    Private Sub Button_ValeursRésiduellesImmobilisations_Click(sender As System.Object, e As System.EventArgs) Handles Button_ValeursRésiduellesImmobilisations.Click
    Me.DataGridView_Corporelles.DataSource = MonViewImmobilisations
                If MonViewImmobilisations.Count > 0 Then
                    For X = 0 To MonViewImmobilisations.Count - 1
                        DataGridView_Corporelles("Résiduelle_DGVCorporelles", X).Value = MonViewImmobilisations(X)("Valeur") - MonViewImmobilisations(X)("Amortissement")
                    Next
                End If
     
    End Sub
    D'où peut venir le dysfonctionnement dans TabPage.Enter ?

    Merci pour votre aide

  2. #2
    Membre du Club
    Homme Profil pro
    Enseignant
    Inscrit en
    mars 2017
    Messages
    76
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations professionnelles :
    Activité : Enseignant
    Secteur : Enseignement

    Informations forums :
    Inscription : mars 2017
    Messages : 76
    Points : 54
    Points
    54

    Par défaut

    Finalement j'ai trouvé la solution à mon problème sur dukdukgo.com

    Il ne faut pas utiliser l'event Enter d'une TabPage mais l'event SelectedIndexChanged du TabControl
    Pour ceux que ça intéresse :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
     
    Private Sub TabControl1_SelectedIndexChanged(sender As Object, e As System.EventArgs) Handles TabControl1.SelectedIndexChanged
            If TabControl1.SelectedTab Is TabPage1 Then
     
            ElseIf TabControl1.SelectedTab Is TabPage2 Then
     
            End if
    End Sub

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. utiliser un tag de struts dans un taglibs
    Par Boosters dans le forum Struts
    Réponses: 3
    Dernier message: 19/06/2006, 19h18
  2. Réponses: 8
    Dernier message: 17/12/2004, 16h58
  3. Réponses: 4
    Dernier message: 03/03/2004, 12h04
  4. Réponses: 4
    Dernier message: 12/09/2003, 12h38
  5. [] Utiliser AVI d'une DLL dans mon programme
    Par seb.49 dans le forum VB 6 et antérieur
    Réponses: 5
    Dernier message: 02/05/2003, 15h52

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo