reneemettrie
Terugkerende gebruiker
- Lid geworden
- 1 aug 2006
- Berichten
- 1.233
Een theoretisch vraagje.
Ik ben wat aan het experimenteren met het programmeren van rapporten en heb (niet erg bruikbare ) subs gemaakt
Maar nu vind ik nergens een onprint event bij de klasse "Section". Wel een property Is er een principe dat me ontgaat of is Microsoft hier niet logisch?
aansluitend hierop: dit werkt zowel bij OnPrint als bij OnFormat.
Klopt het dat je OnFormat moet gebruiken voor zaken die de paginering kunnen beïnvloeden?
Ik ben wat aan het experimenteren met het programmeren van rapporten en heb (niet erg bruikbare ) subs gemaakt
Maar nu vind ik nergens een onprint event bij de klasse "Section". Wel een property Is er een principe dat me ontgaat of is Microsoft hier niet logisch?
aansluitend hierop: dit werkt zowel bij OnPrint als bij OnFormat.
Klopt het dat je OnFormat moet gebruiken voor zaken die de paginering kunnen beïnvloeden?
Code:
Private Sub Formatting _
(color As Double, Italic As Boolean, Bold As Integer, MyFontName As String)
Dim ctl As Control
Me.Detail.BackColor = color
For Each ctl In Me.Detail.Controls
If TypeOf ctl Is TextBox Then
ctl.FontItalic = Italic
ctl.FontWeight = Bold
ctl.FontName = MyFontName
End If
Next
End Sub
Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
'There is a print event for the detailsection for every country
Select Case Country
Case "Belgium"
Formatting RGB(255, 0, 0), True, 900, "Arial"
Case "france"
Formatting RGB(0, 0, 255), True, 700, "Comic Sans Ms"
Case Else
Formatting RGB(200, 200, 200), False, 400, "Courier New"
End Select
End Sub
Laatst bewerkt: