BlueGEEK Journal

Accueil > Manip’s > Visual Basic 6 > Imprimer > Gérer le Bouton Annuler

Boite de dialogue Imprimer

Gérer le Bouton Annuler

mercredi 17 décembre 2008, par bluegyn_spip

- Par défaut le bouton Annuler n’est pas actif dans une boite d’impression (CommonDialog) de Visual Basic

- Pour l’activer il faut mettre à True la propriété

- CancelError


- A partir de la, l’appui sur Annuler va générer une ERREUR

  • Il suffit d’intercepter cette erreur pour traiter l’action "ANNULER"

Voila un exemple de code

Private Sub Command1_Click()



On Error GoTo IMPR_ANNULER



CommonDialog1.ShowPrinter

Printer.NewPage



Exit Sub



IMPR_ANNULER:

MsgBox "Annulé"



End Sub

- Un clic sur le Bouton COMMAND1

  • Ouvre la Boite de dialogue d’Impression

- Un clic sur Imprimer

  • Imprime une page vide

- Un clic sur Annule

  • Affiche Annulé



ATTENTION

- Ce mode de gestion étant vraiment tiré par les cheveux

  • (puisqu’il faut créer une erreur pour activer la routine d’échappement)

- Le programme se bloque en mode Edition/Débogage

  • avec un message d’erreur du type "Bouton annulé sélectionné"

- Il vaut mieux tester en temps réel

  • en mode d’exécution (EXE)