Predmet:Re: Isticanje dela teksta u izvestaju
Stavio sam da se samo deo teksta ističe i za to prepravio kod. Mogu menjati veličinu fonta, boju fonta ali pozicija ostaje zakucana ma kako menjao vrednosti Me.CurrentX = 10 i Me.CurrentY = 110. Takođe i vrsta fonta ostaje ista. Evo kako izgleda kod
Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
Dim DuzTeksta As Single
Dim DuzinaPapira As Single
Dim StartX As Integer
Dim StartY As Integer
Dim Tekst As String
DuzinaPapira = Me.Width
Me.FontName = TimesNewRoman
Me.ForeColor = 0
Me.FontSize = 18
Me.FontBold = True
Me.CurrentX = 10
Me.CurrentY = 110
Tekst = "prezentacija.gov.rs/svs/HTML/inspekcijski%20nadzor2.html "
Me.CurrentY = 110
Print Tekst
End Sub