Reports

4.3 Inserire linee e rettangoli in un report.
  Davide La Mantia (Sib)
E' possibile inserire linee e rettangoli in un report tracciandoli come meglio ci servono, per farlo è sufficiente, nell'evento SuPagina del report, usare il metodo Line così:
Me.Line (Xi,Yi)-(Xf,Yf)

In questo modo si realizza una linea che parte dal punto Xi,Yi e arriva nel punto Xf,Yf La sintassi completa del metodo è: (tratta dall'help di Access)
oggetto.Line [[Step](x1, y1)] - [Step](x2, y2)[, [colore][, B[F]]] 
Per i dettagli si faccia riferimento alla guida, qui riporto solo che: "colore" indica il colore della linea, "B" indica che deve essere disegnato un rettangolo e non una linea "F" (usato solo insieme all'opzione "B") indica che il rettangolo va disegnato pieno.
Per un esempio di questo metodo si provi ad inserire il seguente codice nel modulo di un qualunque report.
Private Sub Report_Page()
   Me.Line (0, 0)-(Me.ScaleWidth, Me.ScaleHeight - 10), , B
End Sub


Se pensate di avere del materiale freeware interessante e volete pubblicarlo, allora leggete qui.