Files
SDL/SDL/Formulare/Einheitspapier/rptEinheitspapier0736.vb

17 lines
487 B
VB.net

Imports GrapeCity.ActiveReports
Imports GrapeCity.ActiveReports.Document
Public Class rptEinheitspapier0736
Sub New(RandOben As Double)
' Dieser Aufruf ist für den Designer erforderlich.
InitializeComponent()
RandOben = RandOben / 10 'mm
Me.PageSettings.Margins.Top = (RandOben / (2.54)) 'cm in ZOLL
End Sub
Private Sub rptEinheitspapier0777_ReportStart(sender As Object, e As EventArgs) Handles MyBase.ReportStart
End Sub
End Class