Login | Register   
RSS Feed
Download our iPhone app
Browse DevX
Sign up for e-mail newsletters from DevX

Tip of the Day
Language: Visual Basic
Expertise: Intermediate
Jan 8, 1999

Reduce Filtering Frustration

This code works wonders to reduce flicker and lessen your frustration. Place a timer on the form (tmr_Timer) and set the Interval to 1000. Set Enabled to False, then place this code in the txt_Filter_Change event:
Private Sub txtFilter_Change()
	Timer1.Enabled = False
	Timer1.Enabled = True
End Sub
In the Timer event, call this routine that refreshes your recordset:
Private Sub Timer1_Timer()
	Timer1.Enabled = False
	Call MyUpdateRecordsetRoutine
End Sub
The recordset will only be updated if you haven't pressed a key for a full second. Each time you press a key, the timer is reset and the one-second countdown starts all over again.
Tom Welch
Comment and Contribute






(Maximum characters: 1200). You have 1200 characters left.



Thanks for your registration, follow us on our social networks to keep up-to-date