Dans un projet : plusieurs fen=EAtres ont =E9t=E9 d=E9velopp=E9es ,=20
dans une fen=EAtre un bouton :"imprimer" est mis en place=20
qui lance la bo=EEte de dialogue (Commondialog1.showprinter)
La bo=EEte de dialogue s'affiche mais il est impossible de=20
capter la r=E9ponse : "annuler".
Cr=E9ation d'un nouveau projet avec une fen=EAtre un bouton=20
qui lance la bo=EEte de dialogue : la bo=EEte de dialogue=20
s'affiche et il est possible de capter la=20
r=E9ponse :"annuler".
Cela se passe sur le m=EAme poste de travail .
NB : la suppression de la r=E9f=E9rence =E0 la bo=EEte de dialogue=20
puis la remise en place d'une bo=EEte de dialogue n'a rien=20
chang=E9 au pb.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
François Picalausa
Hello,
Peut-on voir ton code?
Ceci fonctionn bien ici: Option Explicit
Private Sub Command1_Click() On Error GoTo ErrHandler CommonDialog1.CancelError = True CommonDialog1.ShowPrinter
Exit Sub ErrHandler: Select Case Err.Number Case cdlCancel MsgBox "Vous avez annulé l'opération!" Case Else MsgBox Err.Description End Select End Sub
-- François Picalausa (MVP VB) http://faq.vb.free.fr --- http://msdn.microsoft.com http://apisvb.europe.webmatrixhosting.net
"" a écrit dans le message de news:1d18401c45382$b9296c10$
Dans un projet : plusieurs fenêtres ont été développées , dans une fenêtre un bouton :"imprimer" est mis en place qui lance la boîte de dialogue (Commondialog1.showprinter) La boîte de dialogue s'affiche mais il est impossible de capter la réponse : "annuler". Création d'un nouveau projet avec une fenêtre un bouton qui lance la boîte de dialogue : la boîte de dialogue s'affiche et il est possible de capter la réponse :"annuler". Cela se passe sur le même poste de travail .
Hello,
Peut-on voir ton code?
Ceci fonctionn bien ici:
Option Explicit
Private Sub Command1_Click()
On Error GoTo ErrHandler
CommonDialog1.CancelError = True
CommonDialog1.ShowPrinter
Exit Sub
ErrHandler:
Select Case Err.Number
Case cdlCancel
MsgBox "Vous avez annulé l'opération!"
Case Else
MsgBox Err.Description
End Select
End Sub
--
François Picalausa (MVP VB)
http://faq.vb.free.fr --- http://msdn.microsoft.com
http://apisvb.europe.webmatrixhosting.net
"michel.giroud@afpa.fr" <anonymous@discussions.microsoft.com> a écrit
dans le message de news:1d18401c45382$b9296c10$a501280a@phx.gbl
Dans un projet : plusieurs fenêtres ont été développées ,
dans une fenêtre un bouton :"imprimer" est mis en place
qui lance la boîte de dialogue (Commondialog1.showprinter)
La boîte de dialogue s'affiche mais il est impossible de
capter la réponse : "annuler".
Création d'un nouveau projet avec une fenêtre un bouton
qui lance la boîte de dialogue : la boîte de dialogue
s'affiche et il est possible de capter la
réponse :"annuler".
Cela se passe sur le même poste de travail .
Private Sub Command1_Click() On Error GoTo ErrHandler CommonDialog1.CancelError = True CommonDialog1.ShowPrinter
Exit Sub ErrHandler: Select Case Err.Number Case cdlCancel MsgBox "Vous avez annulé l'opération!" Case Else MsgBox Err.Description End Select End Sub
-- François Picalausa (MVP VB) http://faq.vb.free.fr --- http://msdn.microsoft.com http://apisvb.europe.webmatrixhosting.net
"" a écrit dans le message de news:1d18401c45382$b9296c10$
Dans un projet : plusieurs fenêtres ont été développées , dans une fenêtre un bouton :"imprimer" est mis en place qui lance la boîte de dialogue (Commondialog1.showprinter) La boîte de dialogue s'affiche mais il est impossible de capter la réponse : "annuler". Création d'un nouveau projet avec une fenêtre un bouton qui lance la boîte de dialogue : la boîte de dialogue s'affiche et il est possible de capter la réponse :"annuler". Cela se passe sur le même poste de travail .