Article View: free.it.visual-basic
Article #1014Re: Aiuto allinemanto su carta
From: ~Incoming
Date: Tue, 14 Dec 2004 15:55
Date: Tue, 14 Dec 2004 15:55
63 lines
3288 bytes
3288 bytes
Ciao, AP!
hai scritto xXZtd.15183$Zk.259517@twister2.libero.it
Thu, 09 Dec 2004 15:12:29 GMT:
[skip]
> ........� solamente per un fatto estetico
> Per essere allineati a destra come posso fare?
> Mi suggerite qualche cosa?
yessss
stampi il form o hai scritto la routin che stampa le righe?
nel secondo caso usa caratteri fissi (es. courier),
(per capire come farei; sul tuo outlook
spunta la voce di menu' Visualizza>Carattere>Fisso)
1 2 3 4 5 6
123456789012345678901234567890123456789012345678901234567890
13car| 13car| 10car| 10car| 14car |
Quantit� Descrizione Prezzo Iva Importo
txt1 text2 txt3 txt4 label1
txt5 text8 txt11 txt14 label2
txt6 text9 txt12 txt15 label3
txt7 text10 txt13 txt16 label4
(allora come vedi sulla tua tabella ho aggiunto una sorta di
righello x caratteri, diciamo 60 per tutte le colonne,
ho anche diviso le varie colonne e' chiaro che tu farai come vuoi)
ora creo le prime due righe (piu' facile fare l'esempio)
(qua e' la variabile stringa ="quantita'", des per
"descrizione" ecc, ok?)
1�
riga=qua & space(13- len(qua)) & des & space(13 - len(des)) &
space(10 - len(pre)) & pre & space(10 - len(iva)) & iva &
space(14 - len(impo)) & impo
printer.print riga
2�
riga=txt1 & space(13- len(txt1)) & txt2 & space(13 - len(txt2)) &
space(10 - len(txt3)) & txt3 & space(10 - len(txt4)) & txt4 &
space(14 - len(lbl1)) & lbl1
printer.print riga
ecc
ecc
ecc
come vedi, stabiliti i caratteri per colonna, non ti resta che
aggiungere degli spazi, se dopo, allinei a sinistra, prima a destra.
se poi usi bene le variabili con un ciclo stampi tutto!
p.s.
puoi stampare anche con caratteri non fissi,
ma devi fare piu' operazioni, cioe' le voci le devi stampare
singolarmente e calcolare di volta in volta la posizione.
Cordialita', ~Incoming.
Technical Details
Message-ID:
<cpnl7d$r8l$1@lacerta.tiscalinet.it>Path:
arc1-ca.pugleaf.net!g2news1.google.com!news2.google.com!newsread.com!newsprint.newsread.com!news.glorb.com!feeder.enertel.nl!nntpfeed-01.ops.asmr-01.energis-idc.net!216.196.110.149.MISMATCH!border2.nntp.ams.giganews.com!nntp.giganews.com!tiscali!newsfeed1.ip.tiscali.net!213.205.37.207.MISMATCH!draco.tiscalinet.it!not-for-mailReferences:
<xXZtd.15183$Zk.259517@twister2.libero.it>Show Full Headers
Complete Article Headers
X-Google-Thread: f94ee,4473bc4848b139bc X-Google-Attributes: gidf94ee,public X-Google-Language: ITALIAN,ASCII Path: arc1-ca.pugleaf.net!g2news1.google.com!news2.google.com!newsread.com!newsprint.newsread.com!news.glorb.com!feeder.enertel.nl!nntpfeed-01.ops.asmr-01.energis-idc.net!216.196.110.149.MISMATCH!border2.nntp.ams.giganews.com!nntp.giganews.com!tiscali!newsfeed1.ip.tiscali.net!213.205.37.207.MISMATCH!draco.tiscalinet.it!not-for-mail From: "~Incoming" <speriamo.che.me.l@cavo.it> Newsgroups: free.it.visual-basic Subject: Re: Aiuto allinemanto su carta Date: Tue, 14 Dec 2004 16:55:28 +0100 Organization: Tiscali Spa Lines: 65 Message-ID: <cpnl7d$r8l$1@lacerta.tiscalinet.it> References: <xXZtd.15183$Zk.259517@twister2.libero.it> NNTP-Posting-Host: ppp-62-11-116-238.dialup.tiscali.it X-Trace: lacerta.tiscalinet.it 1103058989 27925 62.11.116.238 (14 Dec 2004 21:16:29 GMT) X-Complaints-To: abuse@tiscali.it NNTP-Posting-Date: 14 Dec 2004 21:16:29 GMT X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 6.00.2800.1106 X-MIMEOLE: Produced By Microsoft MimeOLE V6.00.2800.1106 FL-Build: Fidolook 2002 (SL) 6.0.2800.86 - 14/6/2003 22:16:25 X-Comment-To: AP