22-06-2012, 22:56
Bu yazılanın türkçe uyarlanmışını çevirebilecek bir arkadaşımız var mı (şimdiden teşekkürler):
In Design,View select the Report Property Sheet. Set the timer interval to 2000 (2 secs) and the On Timer event to a procedure.Add a procedure similar to the one below, and Bob is your 'flashing' uncle!(not literally!!)
Private Sub Report_Timer()
If Me.AreaName.BackColor = &HFFFFFF Then
Me.AreaName.BackColor = &HFF0000
Else
Me.AreaName.BackColor = &HFFFFFF
End If
End Sub
Flashing ink for printed reports is available from HP or Epson at around $2000 per cartridge
In Design,View select the Report Property Sheet. Set the timer interval to 2000 (2 secs) and the On Timer event to a procedure.Add a procedure similar to the one below, and Bob is your 'flashing' uncle!(not literally!!)
Private Sub Report_Timer()
If Me.AreaName.BackColor = &HFFFFFF Then
Me.AreaName.BackColor = &HFF0000
Else
Me.AreaName.BackColor = &HFFFFFF
End If
End Sub
Flashing ink for printed reports is available from HP or Epson at around $2000 per cartridge






Yazan okuyan sağolsun, çözene saygılar. Kolaylaştırınız, zorlaştırmayınız.