|
Impression en Visual Basic peut être un peu lourd à mettre en place , mais une fois fait , les subtilités sont invisibles pour l'utilisateur. Un contrôle Visual Basic appelé Common Dialog Control intègre une méthode pour l'impression en Visual Basic. En utilisant le code relié à cette commande ouvre une boîte de dialogue dans laquelle l'utilisateur peut choisir des attributs spécifiques pour l'impression comme les pages à imprimer, le nombre de copies et les propriétés spécifiques de l'imprimante concernée. Instructions
1 Créer la boîte de dialogue d'impression en ouvrant Visual Basic et en sélectionnant " EXE standard " de la liste des modèles proposés pour un nouveau projet . Enregistrez le nouveau projet créé avec un nom simple comme " imprimante" en cliquant sur " Fichier" et " Enregistrer le projet sous." Enter " imprimante" dans la boîte de dialogue qui s'ouvre. Par défaut, Visual Basic attache une extension " VBP . " Enregistrer par défaut " Form1 " créé de la même manière , en cliquant sur " Enregistrer le formulaire sous" et donner la forme le nom "Imprimante" ainsi .
2 ajouter le contrôle Common Dialog pour le projet. Cliquez sur " Projet" dans le menu en haut de votre écran. De la liste déroulante , sélectionnez " Ajouter des pièces . " Descendez une très longue liste qui s'affiche jusqu'à ce que vous voyez " Common Control 6.0 de dialogue Microsoft ( SP6) . Sélectionnez ce avec la souris puis cliquez sur "OK".
3 Double-cliquez sur le contrôle Common Dialog , qui devrait maintenant être apparaissant au bas de la commande représenté dans le panneau de gauche sur l'écran. Une icône ressemblant à deux zéros avec une barre sur eux et deux points l'un sous l'autre représente ce contrôle. Lorsque vous exécutez votre souris sur ce , les mots " CommonDialog " apparaîtra .
4 Double-cliquez sur l'icône " CommandButton " dans le panneau de gauche , représentée par un petit rectangle. Cela met une commande sur le formulaire. Cliquez sur le bouton maintenant étiqueté " Command1. " Dans la liste " Propriétés" pour cette commande sur la droite , changer le nom de « cmdPrint " . Faites défiler la liste jusqu'à ce que vous voyez Changer le nom de cette "Imprimer "
5 type " Légende ". : . FileName Dim, TextLine , BeginPage , EndPage , NumCopies , Orientation, iCommonDialog1.ShowPrinterBeginPage = CommonDialog1 . FromPageEndPage = CommonDialog1.ToPageNumCopies = CommonDialog1.CopiesOrientation = CommonDialog1.OrientationFileName = InputBox (" Quel fichier dois-je imprimer ? " ) Ouvert nom de fichier pour entrée comme # 1Do While Not EOF (1) entrée de ligne n ° 1 , TextLinePrinter.Print TextLineLoopClose # 1End
6 Testez le code en appuyant sur la touche "F5 " puis cliquez sur «Imprimer» sur le formulaire. Entrez l'emplacement du fichier d'un fichier texte sur votre ordinateur. Le document doit être imprimé . Si ce n'est pas , passez en revue chaque ligne de code ci-dessus pour vous assurer qu'il est exact.
|
