begin process at 2012 02 13 17:48:58
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > 

Code

 > 

Imprimante

 > IMPRIMER LE CONTENU D'UNE TEXTBOX

IMPRIMER LE CONTENU D'UNE TEXTBOX


 Information sur la source

Note :
4,23 / 10 - par 35 personnes
4,23 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Imprimante Classé sous :imprimer, texte, textbox Niveau :Initié Date de création :06/03/2000 Vu :16 334
Auteur : JCLK

Ecrire un message privé
Commentaire sur cette source (10)
Ajouter un commentaire et/ou une note

 Description

Soit une Feuille (Form1) qui contient une TextBox (Text1) et un bouton (Imprimer).
On imprime le contenu de Text1 de la façon suivante :

Source

  • 'code affecté au bouton "Imprimer"
  • Private Sub Imprimer_Click()
  • vari = Form1.Text1.Text
  • With Printer
  • .Font = "Times New Roman"
  • ' Police d'impression
  • .FontSize = 10
  • ' taille de police d'impression
  • .PrintQuality = 300
  • 'qualité d'impression 300 DPI
  • .CurrentX = 1000 'position du curseur
  • .CurrentY = 1000 'au début de l'impression
  • End With
  • Printer.Print vari; PrinterPage
  • Printer.EndDoc
  • End Sub
'code affecté au bouton "Imprimer"

Private Sub Imprimer_Click()
vari = Form1.Text1.Text
With Printer
    .Font = "Times New Roman" 
    ' Police d'impression
    .FontSize = 10 
    ' taille de police d'impression
    .PrintQuality = 300 
    'qualité d'impression 300 DPI
    .CurrentX = 1000  'position du curseur
    .CurrentY = 1000  'au début de l'impression
End With
Printer.Print vari; PrinterPage
Printer.EndDoc
End Sub

 Conclusion

Ce code est incomplet, mais il donne une idée de ce qu'il faut faire... Je n'ai pas le temps de le compléter.


 Sources du même auteur

Source avec Zip PURGER UNE CHAINE DE CARACTERE DE SES ESPACES INUTILES
Source avec Zip JOUER, PAUSER, ARRETER ET FERMER UN SON AVEC MMCONTROL
COUPER, COPIER, COLLER DANS UNE RICHTEXTBOX
SAVOIR SI LA SOURIS EST AU DESSUS D'UN OBJET
ENREGISTRER LE CONTENU D'UNE TEXTBOX DANS UN FICHIER
Toutes les sources de JCLK

 Sources de la même categorie

Source avec Zip Source avec une capture Source .NET (Dotnet) PARAMETRES_IMPRIMANTE par Le Pivert
Source avec Zip Source .NET (Dotnet) IMPRESSION FACILE EN ÉVITANT LES BUGS DU FRAMEWORK par circular
Source avec Zip Source .NET (Dotnet) CLASSE POUR AJOUTER/CONNECTER/DECONNECTER UNE IMPRIMANTE RÉS... par radcur
Source avec Zip Source avec une capture IMPRESSION AU FIL DE L'EAU VERS IMPRIMANTE MATRICIELLE par rimas10
Source avec Zip Source avec une capture IMPRIMER CODE BARE par StetechCove
Toutes les sources de la catégorie Imprimante

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture Source .NET (Dotnet) DÉTECTION DES MOTS DANS UN TEXTBOX OU UN RICHTEXTBOX AU PASS... par XDarwin
Source avec Zip Source .NET (Dotnet) MANIPULER LES CHAÎNES ET TRIER UNE LISTE DE NOMS par Lisa46
Source avec Zip IMPRIMER UNE TEXTBOX AVEC PLUSIEURS LIGNES par bfb
Source avec Zip Source avec une capture CONTROLE "TEXTE" POUVANT ÊTRE REDIMENSIONNÉ par Morricon
Source avec Zip Source avec une capture LIVE (( TRAITEMENT DE TEXTE )) par crossblade

Commentaires et avis

Commentaire de SysteM le 25/05/2002 15:41:18

Je n'ai pas le temps de le compléter....

A la place de poster tout suite, complete ton code puis poste apres ;)

Commentaire de daetips le 03/09/2003 21:39:41

franchement ton code est vrémént super

Commentaire de Sibelle07 le 27/09/2003 18:24:47

Ouf , voila ce que je cherchait est superbement bien trouver de plus je tient a t'ajouter un 10/10 ;-)

Commentaire de wallon14 le 11/06/2004 15:33:21

Très bien ce petit code ;o)

Mais pensez aux retours à la ligne, sinon vous imprimerez seulement sur une ligne !

Commentaire de wallon14 le 11/06/2004 15:34:11

J'viens de mettre 10/10 et le vote reste a 3... Je ne comprend pas, ce code est très bien !

Commentaire de mimianass le 06/04/2006 17:39:48

votre code ca marche pas il m donne des erreurs j'ai besoin  de ce code

Commentaire de FLYeRNeT le 05/07/2006 10:02:39

Simple et fonctionnel !

Merci pour ce code ! ;)

Commentaire de benahmedsoufiane le 06/02/2007 22:10:46

Cool la source !

Commentaire de fra1ft le 02/11/2007 09:55:35

Hello @ all!
Donc, si je comprend bien, j'ai deux possibilitées principales pour imprimer le contenu de mon form:

Private Sub Imprimer_Click()
vari = Form1.Text1.Text & vbCrLf
vari = vari & "Texte: " & Form1.ComboBox1.Text & vbCrLf
vari = vari & "C`était un exemple"
With Printer
.Font = "Times New Roman"
' Police d'impression
.FontSize = 10
' taille de police d'impression
.PrintQuality = 300
'qualité d'impression 300 DPI
.CurrentX = 1000 'position du curseur
.CurrentY = 1000 'au début de l'impression
End With
Printer.Print vari; PrinterPage
Printer.EndDoc
End Sub

ou:

Private Sub Imprimer_Click()
'1ere section d'impression
vari = Form1.Text1.Text & vbCrLf
With Printer
.Font = "Times New Roman"
' Police d'impression
.FontSize = 10
' taille de police d'impression
.PrintQuality = 300
'qualité d'impression 300 DPI
.CurrentX = 1000 'position du curseur
.CurrentY = 1000 'au début de l'impression
End With
Printer.Print vari; PrinterPage
Printer.EndDoc
'2eme section d'impression
vari = vari & "Texte: " & Form1.ComboBox1.Text & vbCrLf
vari = vari & Form1.UserForm1.Label1.Caption & "<= This is a result"
vari = vari & "C`était un exemple"
With Printer
.Font = "Verdana, Bold"
' Police d'impression
.FontSize = 14
' taille de police d'impression
.PrintQuality = 300
'qualité d'impression 300 DPI
.CurrentX = 200 'position du curseur
.CurrentY = 800 'au début de l'impression
End With
Printer.Print vari; PrinterPage
Printer.EndDoc
End Sub


Me trompe-je?

Commentaire de fra1ft le 02/11/2007 09:59:15

Dommage que nous ne puissions éditer notre post...
Lisez dans mon précédent post:

'2eme section d'impression
vari = "Texte: " & Form1.ComboBox1.Text & vbCrLf

et non vari = vari & "blabla...
Désolé!!!

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Imprimer les texte d'une textbox [ par nuttyfbr ] Salut quelqu'un peut-il me dire comment imprimer le contenu d'une textbox ???? avec un bouton imprimer ... Parce que la, je sèche ... Merci d'avance . Imprimer le contenue d'une textbox de plusieurs lignes [ par kinkajou88 ] voila mon problème:J'ai une textbox avec beaucoup de texte et je voudrais savoir comment l'imprimer. A ce jour, quand j'imprime, je me retrouve avec l Impression [ par i2c03a ] Je souhaite imprimer le contenu d'un label ou d'un textBox ou directement un texte via printer.print "". Mon probl&#232;me est le suivant: -J'arrive b imprimer le texte de plusieurs textbox [ par olive30000 ] bonjour à toutes et à tousmon projet est de créer un exe pour imprimer des enveloppespour cela , j'ai ma base de donnée sous mdbje voudrais créer une imprimer un textbox, avec des retour charriot [ par 8369 ] Bonjour à tous de Visual,dans une form j'ai Sauvegarde TextBox et Label en fichier Texte [ par Mat1554 ] Bonjour, j'aimerais savoir si ses possible (si oui comment car j ai pas trouver tutorial sous google) de faire qu'en cliquant sur le bouton sauvegarde TextBox [ par juloss ] Bonjour à tous!!!j'ai un petit problème et sa me rend fou. Je réalise un petit programme avec Visual Basic 6.0, c'est un carnet d'adresse. J'aimerais Ecrire/Modifier des champs dans un fichier texte/ou textbox [ par Scorpio974 ] Bonjour !J'ai un texte avec des données bien structurées (espacés par des tabulations) :Champ1   Champ2   Champ3J'aimerais savoir commment faire pou TextBox Selection Inverse [ par eldim ] Bonjour,question de base : j'ai un textbox que je veux sélectionner en entier, lorsque je fais ça je ne vois que la fin de mon texte car la sélection


Nos sponsors


Sondage...

Comparez les prix


Sony Ericsson XPERIA X10 (1 Go)
Entre 649€ et 649€

Visiter le guide achat

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

Photo Happy Bright Landscape WIth ButterfliesPhoto Renewable Energy is Within Reach
Photo Single Large Rock Formation in Monument Valley 

Visiter la photothèque
 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 2,402 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)