Archief - [PROG][VB6] Database Afprinten

Het archief is een bevroren moment uit een vorige versie van dit forum, met andere regels en andere bazen. Deze posts weerspiegelen op geen enkele manier onze huidige ideeën, waarden of wereldbeelden en zijn op sommige plaatsen gecensureerd wegens ontoelaatbaar. Veel zijn in een andere tijdsgeest gemaakt, al dan niet ironisch - zoals in het ironische subforum Off-Topic - en zouden op dit moment niet meer gepost (mogen) worden. Toch bieden we dit archief nog graag aan als informatiedatabank en naslagwerk. Lees er hier meer over of start een gesprek met anderen.
S

Spacewide

Legacy Member
Yuups!

Ik zoek namelijk een mannier om een database geïntegreerd in een visual basic applicatie te kunne afprinten!
Neem als voorbeeld dit formuliertje -> http://www.vbtutor.net/lesson21.html

BV: "Titel" *TAB* "Publisher" *TAB* "Jaar" enz...

Een collega zei overzetten naar een Excel sheet en verder.. maarja, theoretisch klinkt het wel logisch maar in praktijk :oink:

Hoop alvast dat iemand me kan bijsturen ;)

VSY
I

InFerNo

Legacy Member
wil je de form printen?
of wil je de inhoud printen?

voor de inhoud is het dacht ik:
printer.print variable of printer.print "string"
en dan printer.enddoc

om een hele tekst te printe:
printer.print "Titel"
printer.print "Subtitel"
printer.print "Tekst"
Printer.EndDoc

:P
dan moet ge wel gaan aligneren maar das ni moeilijk e
om links te alignere pakt ge ne right() van wat ge wilt afdrukke + spaties
maar dan moet ge wel een system font pakken :)

dus bijvoorbeeld als strTest(1) = "Test0rz" en strTest(2) = "T"
ge wilt deze beide links alignere, maar 7 spaties van de kant 30 karakters lang, dan doet ge:
Code: 
for intteller = 1 to 2
String(7, " ") + Left(strTest(intteller) & String(30, " ")) & vbcrlf
next intteller

dan krijgt ge (ik moet het helaas met dashes doen op dit forum):
-------Testorz-----------------------
-------T-----------------------------

om rechts te alignen dan neemt ge de right() en veranderd ge de String() van plaats met de variable


:P


edit:
ik moet wel zegge dat ik dat printgedoe maar ergens heb gelezen e, dus ik ben daar ni zeker van, maar dan zou 't wel zo kunne zijn

Code: 
for intteller = 1 to 2
Printer.print String(7, " ") + Left(strTest(intteller) & String(30, " "))
next intteller
printer.EndDoc




edit:
LMAO, een reply van 12 dage later :P
S

Spacewide

Legacy Member
Beter laat dan nooit :P
Ben wel vaak komen checken, maar ik heb geduld.

Ik zal het een van de dagen wel uitproberen

alvast bedankt voor de moeite!!

:niceone:
Het archief is een bevroren moment uit een vorige versie van dit forum, met andere regels en andere bazen. Deze posts weerspiegelen op geen enkele manier onze huidige ideeën, waarden of wereldbeelden en zijn op sommige plaatsen gecensureerd wegens ontoelaatbaar. Veel zijn in een andere tijdsgeest gemaakt, al dan niet ironisch - zoals in het ironische subforum Off-Topic - en zouden op dit moment niet meer gepost (mogen) worden. Toch bieden we dit archief nog graag aan als informatiedatabank en naslagwerk. Lees er hier meer over of start een gesprek met anderen.
Terug
Bovenaan