[Visual Basic]
Private Sub TXP_AuswertungCR()
[Visual Basic] Private Sub TXP_AuswertungCR()
Get_SQLWhere()
Me.Auswertungsdaten = Me.auswertungen.Get_Auswertungsdaten(Me.auswertungen.Auswertung.sSQL.Value, SQLWhere, True)
Dim f As New frmcrreporting(Me.Auswertungsdaten, Me.auswertungen.Auswertung.iAuswertungNr.Value, Me.auswertungen, Me.checkboxprintparam.Checked)
f.MdiParent = Me.MdiParent
Me.Cursor = Cursors.Default
f.Show()
End Sub
Plattformen: Windows 98, Windows 2000 SP4, Windows Millennium Edition, Windows Server 2003, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP SP2, Windows XP Starter Edition