Mini systeme de code

Contenu du snippet

TT est dans l'title ;) !

Source / Exemple :


Private Sub Command1_Click()
If Pass.Text = "pass" Then ' si le mot de passe est "pass"...
Form1.Visible = False ' La form1 se "cache"
Call Form2.Show ' et la deuxième form s'ouvre
Else ' mais si cela ne se produit pas ..
MsgBox "Mauvais mot de passe veuillez recommencer !", vbOKOnly, "Loupé !" ' un message s'affiche
End If ' fin du if
End Sub

Private Sub Form_Load()

End Sub

Conclusion :


Comme vous pouvez le voir , c'est le minimum que l'on puisse faire pour un système de pass :) . bOnne prOg !

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.