A voir également:
- VB6 : Utilisation d'un module
- Vb6 - Télécharger - Divers Utilitaires
- Vb6 portable - Forum VB / VBA
- Vb6 freefile - Forum VB / VBA
- Vb6 windows 10 - Forum VB / VBA
- Vb6 timer - Forum VB / VBA
2 réponses
Utilisateur anonyme
20 avril 2013 à 23:18
20 avril 2013 à 23:18
Dans Module1, tu écris ton Sub (le même servira aussi bien à mettre à true qu'à false)
Dans le formulaire (ou ailleurs) tu l'appelles :
Public Sub Afficher(ByVal Visible as Boolean)
With Form1
.Cmd_Oui.Enabled = Visible
.Cmd_Non.Enabled = Visible
.Cmd_Commande.Enabled = Visible
.Cmd_Annuler.Enabled = Visible
End With
End Sub
Dans le formulaire (ou ailleurs) tu l'appelles :
Afficher Trueou
Afficher Falseselon les besoins
Utilisateur anonyme
Modifié par le père. le 21/04/2013 à 13:44
Modifié par le père. le 21/04/2013 à 13:44
Des solutions plus ou moins faciles ? Celle-ci peut être considérée comme très simple, je ne t'en donnerai pas de plus facile.
Si tu veux utiliser le même code avec d'autres formulaires, il ne faut pas que le nom "Form1" soit écrit explicitement dans le code, car si tu l'appelles depuis Form2, ce qui est possible, ce sera toujours Form1 qui sera modifié.
Il faut donc ajouter le Form en paramètre :
Et pour l'appeler, sachant que le mot-clé Me désigne le Form à l'intérieur duquel il est utilisé :
Bien sûr, tout ceci ne marche que si tu as bien les boutons Cmd_Oui, Cmd_Non, Cmd_Commande et Cmd_Annuler sur tes différents forms
Si tu veux utiliser le même code avec d'autres formulaires, il ne faut pas que le nom "Form1" soit écrit explicitement dans le code, car si tu l'appelles depuis Form2, ce qui est possible, ce sera toujours Form1 qui sera modifié.
Il faut donc ajouter le Form en paramètre :
Public Sub Afficher(MonForm as Form, ByVal Visible as Boolean) With MonForm .Cmd_Oui.Enabled = Visible .Cmd_Non.Enabled = Visible .Cmd_Commande.Enabled = Visible .Cmd_Annuler.Enabled = Visible End With End Sub
Et pour l'appeler, sachant que le mot-clé Me désigne le Form à l'intérieur duquel il est utilisé :
Afficher Me, Trueou
Afficher Me, False
Bien sûr, tout ceci ne marche que si tu as bien les boutons Cmd_Oui, Cmd_Non, Cmd_Commande et Cmd_Annuler sur tes différents forms
21 avril 2013 à 12:42
Merci beaucoup pour votre aide. Celle-là a très bien marché. Toutefois, je suis curieuse de savoir s'il n'y a pas d'autre solution plus ou moins facile que celle vous m'avez proposée. Surtout si je veux utiliser ces codes dans d'autres formulaires du projet. Merci !