|
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
|