Sto cercando di creare un programma gestionale di un magazzino di un negozio, fin'ora sto ancora in alto mare perchè cerco di dedicarmi ad alcune funzioni che non conosco in modo da "accelerare" il lavoro saltando quello che presumo di saper fare.
Ora mi sono impiantato sull'anteprima di stampa di tutti gli articoli del magazzino.
Sto provando a fare una cosa del genere :
Dove Picture è una PictureBoxcodice:Private Sub Command1_Click() picture.Cls picture.Print frmMag.Magazzino.Columns(0) & " " & frmMag.Magazzino.Columns(1) & " " & frmMag.Magazzino.Columns(2) & " " & frmMag.Magazzino.Columns(3) & " " & frmMag.Magazzino.Columns(4) End Sub
frmMag è il Form principale da dove caricare i dati
Magazzino è un DBGrid di conseguenza Columns(X) sono i dati delle colonne.
Quello che vorrei fare è mandare a rullo tutti i dati presenti nel DBGrid e farli scrivere come immagine nella PictureBox, e soprattutto creare delle linee divisorie continue simili all'esempio che vi proporrò qui di seguito, ma ripeto linee intere.
Es:
________________________________________
|Col1a |Col2a |Col3a |Col4a |Col5a |
------------------------------------------------------
|Col1b |Col2b |Col3b |Col4b |Col5b |
------------------------------------------------------
|Col1c |Col2c |Col3c |Col4c |Col5c |
------------------------------------------------------
Ho provato con il comando
Picture.Print Line (XXX,YYY)(XXX,YYY)
Ma l'unico risultato che mi ha dato è stato un errore!!!![]()
Help Me !!!!![]()
![]()
P.S.: Posso cambiare anche la dimensione del carattere nell'anteprima di stampa in modo che non venga una tabella da vedere con la lente ? :P tnx