I have a form that contains a pageframe with a large number of controls on each page. Page 3 of the pageframe contains 96 textboxes which are subclassed to present computed data. The refresh method of the custom textbox contains the following code:

var1 = "day1." + alltrim(this.Name)
var2 = "day2." + alltrim(this.name)
v3 = val(strtran(this.Name,"P",space(1)))+100
var3 = "day1.P" + alltrim(str(v3))
var4 = "day2.P" + alltrim(str(v3))
this.Value = int((evaluate(var1)+evaluate(var2)+evaluate(var3)+evaluate(var4))/2)

Everything works fine except that the first time the user selects this page (page 3) it takes a long time for the page to refresh and come up. After the first calculation the page works reasonable fast as we skip through the records. I have played with lockscreen but have not been able to find a way to speed up the initial refresh. The page has

this.refresh

in the activate event.

Does anyone know of a way to speedup the initial calculation?

Thanks in advance.