Label phantome [Résolu]

Signaler
Messages postés
548
Date d'inscription
mercredi 28 juillet 2004
Statut
Membre
Dernière intervention
11 septembre 2013
-
Messages postés
548
Date d'inscription
mercredi 28 juillet 2004
Statut
Membre
Dernière intervention
11 septembre 2013
-
Bonjour,

Voici le code:

Private Sub accueil_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Show()
Me.Label_connexion.Visible = True
Me.Etiq_catconsautresTableAdapter.Fill(Me.CATREFSDataSet.etiq_catconsautres)
Me.Etiq_catconsdivaltoTableAdapter.Fill(Me.CATREFSDataSet.etiq_catconsdivalto)
Me.Etiq_vehiculesTableAdapter.Fill(Me.CATREFSDataSet.etiq_vehicules)
Me.Etiq_referencesTableAdapter.Fill(Me.CATREFSDataSet.etiq_references)
Me.CatrefstTableAdapter.Fill(Me.CATREFSDataSet.catrefst)
Me.CatrefssouTableAdapter.Fill(Me.CATREFSDataSet.catrefssou)
Me.Catrefsd_feuil1TableAdapter.Fill(Me.CATREFSDataSet.catrefsd_feuil1)
Me.Catrefsa_Feuil1TableAdapter.Fill(Me.CATREFSDataSet.catrefsa_Feuil1)
Me.Catrefscv_feuil1TableAdapter.Fill(Me.CATREFSDataSet.catrefscv_feuil1)
Me.Catrefssph_feuil1TableAdapter.Fill(Me.CATREFSDataSet.catrefssph_feuil1)

Me.rep_generation.Text = "C:\Users\Administrateur\Desktop\Générés"
Me.FolderBrowserDialog1.RootFolder = rep_generation.Text
Me.FolderBrowserDialog1.SelectedPath = rep_generation.Text
Me.Label_connexion.Visible = False
End Sub

Ma form s'affiche mais pas le label.

Pourquoi ?

Merci.

3 réponses

Messages postés
14770
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
27 février 2021
151
Bonjour,

Regardes peut être du coté de DoEvents.

---------------------------------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices.[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés/list
---
Mon site
Messages postés
548
Date d'inscription
mercredi 28 juillet 2004
Statut
Membre
Dernière intervention
11 septembre 2013
2
Private Sub accueil_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Label_connexion.Visible = True
Me.Show()
Me.Etiq_catconsautresTableAdapter.Fill(Me.CATREFSDataSet.etiq_catconsautres)
Me.Etiq_catconsdivaltoTableAdapter.Fill(Me.CATREFSDataSet.etiq_catconsdivalto)
Me.Etiq_vehiculesTableAdapter.Fill(Me.CATREFSDataSet.etiq_vehicules)
Me.Etiq_referencesTableAdapter.Fill(Me.CATREFSDataSet.etiq_references)
Me.CatrefstTableAdapter.Fill(Me.CATREFSDataSet.catrefst)
Me.CatrefssouTableAdapter.Fill(Me.CATREFSDataSet.catrefssou)
Me.Catrefsd_feuil1TableAdapter.Fill(Me.CATREFSDataSet.catrefsd_feuil1)
Me.Catrefsa_Feuil1TableAdapter.Fill(Me.CATREFSDataSet.catrefsa_Feuil1)
Me.Catrefscv_feuil1TableAdapter.Fill(Me.CATREFSDataSet.catrefscv_feuil1)
Me.Catrefssph_feuil1TableAdapter.Fill(Me.CATREFSDataSet.catrefssph_feuil1)

Me.rep_generation.Text = "C:\Users\Administrateur\Desktop\Générés"
Me.FolderBrowserDialog1.RootFolder = rep_generation.Text
Me.FolderBrowserDialog1.SelectedPath = rep_generation.Text
Me.Label_connexion.Visible = False
Me.Hide()
Me.Show()
End Sub


avec ce nouveau code il apparait bien avant les fill des datasets mais malgré le visible à false, il reste affiché

???
Messages postés
548
Date d'inscription
mercredi 28 juillet 2004
Statut
Membre
Dernière intervention
11 septembre 2013
2
Merci, c'est bien là qu'il faut chercher.
Bonne soirée.