Cacher une form.

Version imprimable

Cacher une form.

salut,
j'avais un code qui cacher la form1 si les identifiant n'existe pas et qui montré la form2 pour les insérer.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Dim pseudo As String
        Dim mdp As String
        ''''RECUPERATION DES INFORMATIONS'''
        pseudo = My.Settings.pseudo
        mdp = My.Settings.mdp
        'topform = My.Settings.topform
        ''''FIN RECUPERATION DES INFORMATIONS'''
 
        '''' SI LES IDENTIFIANT NEXISTE PAS''''
        If (pseudo = "" Or mdp = "") Then
            Form2.Show()
            Me.unload()
            'Exit Sub
        End If
        '''' SI LES IDENTIFIANT NEXISTE PAS''''

Ceci est le code contenu dans load.

Mais le probleme c'est que le form1 ne se cache pas.

J'ai donc essayé juste cela et ca ne fonctionne toujours pas je ne comprend pas pourquoi :

Code:

1
2
3
4
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Me.Hide()
 
    End Sub

vous savez d'ou viens le problème?
Merci beaucoup

20/12/2007, 23h46
olsimare
Bonjour.

Le Load survient avant le Show qui affiche la form donc c'est normal.

A la rigueur tu peux faire :
Code:

1 2 3 4 Private Sub Form1_Shown(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Shown Me.Hide() End Sub
Mais bon, conceptuellement c'est pas terrible ...

Le mieux ça reste de ne pas créer la form du tout si certaines conditions ne sont pas remplies.

Cdt.
21/12/2007, 00h22
morgan47

tu parle de passer pas sub main et ensuite d'afficher ou pas les form?

si c'est le cas, c'est ce que j'envisagé.
21/12/2007, 09h53
olsimare

Bonjour.

Tout à fait :king: !

Cdt.