|  
    
 Déterminer le nombre de pages pour un contrôle " PrintDialog » dans votre application Visual Basic.NET peut facilement être accompli en utilisant quelques propriétés . Une classe " PrintDialog " permet aux utilisateurs de sélectionner une imprimante et choisir les sections du document à imprimer à partir d' une application Windows Forms. Obtenez les paramètres de l'imprimante à l'aide de la propriété " PrinterSettings " . Vous pouvez déterminer le nombre de pages pour le nombre de copies , ou si le nombre minimum et maximum page, en utilisant la même propriété. Choses que vous devez   Microsoft Visual Studio   Voir Plus Instructions   1  Lancement de Microsoft Visual Studio, cliquez sur " Nouveau Projet" dans le volet gauche de l'écran de votre ordinateur, et étendre " Modèles installés . " " Visual Basic " ci-dessous Cliquez sur "Windows" et double-cliquez sur "Application Windows Forms " du centre de la fenêtre de dialogue pour créer un nouveau projet.   2   Double- cliquez sur "Button " dans le volet «boîte à outils » pour ajouter un nouveau bouton à votre formulaire. Cliquez-droit sur le formulaire et cliquez sur " Afficher le code " pour ouvrir un module de code   3   Ajoutez la ligne de code suivante pour créer une variable globale à ce fichier : .   < p> Private WithEvents DocToPrint As New Printing.PrintDocument   4   Copiez et collez le code suivant pour créer un nouvel événement de clic:     Private Sub Button1_Click ( expéditeur de ByVal comme System.Object , _     ByVal e As System.EventArgs ) Poignées Button1.Click   5   Copier et coller le code suivant pour déterminer le nombre de pages à partir de la commande " PrintDialog1 ":   < p> PrintDialog1.AllowSomePages = True     Dim minPage = PrintDialog1.PrinterSettings.MinimumPage     Dim maxPage = PrintDialog1.PrinterSettings.MaximumPage     Dim pageCnt = PrintDialog1.PrinterSettings.Copies     MessageBox.Show (" la page Min :" & _ minPage     et " Max la page :" & _ maxPage     et " Nbre de copies :" & pageCnt ) < br >   PrintDialog1.ShowHelp = True     PrintDialog1.Document = DocToPrint     résultat As DialogResult = PrintDialog1.ShowDialog ()     (résultat = DialogResult.OK ) puis     docToPrint.Print ()     End If End Sub       6   Appuyez sur " F5" pour exécuter le programme, puis cliquez sur " Button1 "pour afficher une boîte de message avec la page min , page maximum et le nombre de copies à imprimer.    
 
 |