slow refresh of form when using large tab control

Please start any new threads on our new site at https://forums.sqlteam.com. We've got lots of great SQL Server experts to answer whatever question you can come up with.

All Forums

Other Forums

MS Access

slow refresh of form when using large tab control

Author

Topic

kevinrea
Starting Member

2 Posts

Posted - 2004-05-25 : 15:27:14

hi guys,

i have a form with a large tab control on it., it has about 60 tabs.
well, when i change which tabs show with code, it takes several seconds for it to refresh on the screen.
i am not running a slow pc, it is a 2.4ghz.
Can any of you think of a way to speed this up ?
here is one piece of code I am using to do this.
thanks,
Please email me at:
kevin.rea@ngc.com


Private Sub NumberOfBedrooms_AfterUpdate()
'-------START routine to set how many bedrooms
	If Me.NumberOfBedrooms = 10 Then
		Me.Page16.Visible = True
		Me.Page15.Visible = True
		Me.Page14.Visible = True
		Me.Page13.Visible = True
		Me.Page12.Visible = True
		Me.Page11.Visible = True
		Me.Page10.Visible = True
		Me.Page09.Visible = True
		Me.Page08.Visible = True
		Me.Page07.Visible = True

ElseIf Me.NumberOfBedrooms = 9 Then
		Me.Page16.Visible = False
		Me.Page15.Visible = True
		Me.Page14.Visible = True
		Me.Page13.Visible = True
		Me.Page12.Visible = True
		Me.Page11.Visible = True
		Me.Page10.Visible = True
		Me.Page09.Visible = True
		Me.Page08.Visible = True
		Me.Page07.Visible = True

ElseIf Me.NumberOfBedrooms = 8 Then
		Me.Page16.Visible = False
		Me.Page15.Visible = False
		Me.Page14.Visible = True
		Me.Page13.Visible = True
		Me.Page12.Visible = True
		Me.Page11.Visible = True
		Me.Page10.Visible = True
		Me.Page09.Visible = True
		Me.Page08.Visible = True
		Me.Page07.Visible = True

ElseIf Me.NumberOfBedrooms = 7 Then
		Me.Page16.Visible = False
		Me.Page15.Visible = False
		Me.Page14.Visible = False
		Me.Page13.Visible = True
		Me.Page12.Visible = True
		Me.Page11.Visible = True
		Me.Page10.Visible = True
		Me.Page09.Visible = True
		Me.Page08.Visible = True
		Me.Page07.Visible = True

ElseIf Me.NumberOfBedrooms = 6 Then
		Me.Page16.Visible = False
		Me.Page15.Visible = False
		Me.Page14.Visible = False
		Me.Page13.Visible = False
		Me.Page12.Visible = True
		Me.Page11.Visible = True
		Me.Page10.Visible = True
		Me.Page09.Visible = True
		Me.Page08.Visible = True
		Me.Page07.Visible = True

ElseIf Me.NumberOfBedrooms = 5 Then
		Me.Page16.Visible = False
		Me.Page15.Visible = False
		Me.Page14.Visible = False
		Me.Page13.Visible = False
		Me.Page12.Visible = False
		Me.Page11.Visible = True
		Me.Page10.Visible = True
		Me.Page09.Visible = True
		Me.Page08.Visible = True
		Me.Page07.Visible = True

ElseIf Me.NumberOfBedrooms = 4 Then
		Me.Page16.Visible = False
		Me.Page15.Visible = False
		Me.Page14.Visible = False
		Me.Page13.Visible = False
		Me.Page12.Visible = False
		Me.Page11.Visible = False
		Me.Page10.Visible = True
		Me.Page09.Visible = True
		Me.Page08.Visible = True
		Me.Page07.Visible = True
	
ElseIf Me.NumberOfBedrooms = 3 Then
		Me.Page16.Visible = False
		Me.Page15.Visible = False
		Me.Page14.Visible = False
		Me.Page13.Visible = False
		Me.Page12.Visible = False
		Me.Page11.Visible = False
		Me.Page10.Visible = False
		Me.Page09.Visible = True
		Me.Page08.Visible = True
		Me.Page07.Visible = True
	
ElseIf Me.NumberOfBedrooms = 2 Then
		Me.Page16.Visible = False
		Me.Page15.Visible = False
		Me.Page14.Visible = False
		Me.Page13.Visible = False
		Me.Page12.Visible = False
		Me.Page11.Visible = False
		Me.Page10.Visible = False
		Me.Page09.Visible = False
		Me.Page08.Visible = True
		Me.Page07.Visible = True
	
ElseIf Me.NumberOfBedrooms = 1 Then
		Me.Page16.Visible = False
		Me.Page15.Visible = False
		Me.Page14.Visible = False
		Me.Page13.Visible = False
		Me.Page12.Visible = False
		Me.Page11.Visible = False
		Me.Page10.Visible = False
		Me.Page09.Visible = False
		Me.Page08.Visible = False
		Me.Page07.Visible = True
	
ElseIf Me.NumberOfBedrooms = 0 Or Me.NumberOfBedrooms = Null Then
		Me.Page16.Visible = False
		Me.Page15.Visible = False
		Me.Page14.Visible = False
		Me.Page13.Visible = False
		Me.Page12.Visible = False
		Me.Page11.Visible = False
		Me.Page10.Visible = False
		Me.Page09.Visible = True
		Me.Page08.Visible = True
		Me.Page07.Visible = True
End If
'-------END routine to set how many bedrooms

End sub

timmy
Master Smack Fu Yak Hacker

1242 Posts

Posted - 2004-05-25 : 19:55:39

Having done some large multi-tab forms in Access, I can tell you that Access is not very efficient for this. Can you simplify them?
Some other things you can try:
- Use subforms in the tabs, and only bind them when the user selects that tab. That way the tab will be empty most of the time, and the tab navigation should be quicker
- If the tabs contain linked data (ie directly linked to a table/query), try unlinking them. This way you have complete control over when the data is populated.
- Try re-writing in VB : )

You may also find that an Access form that large can get corrupted very easily. Make sure you take backups regularly (ie every day).

Subscribe to SQLTeam.com

SQLTeam.com Articles via RSS

SQLTeam.com Weblog via RSS

- Advertisement -

Resources