Use object substitution to substitute a simple name with an extendedobject reference. Each “.” in the syntax represents an OLE lookup.Better performance is achieved the fewer times lookups need to be performed.For example:
For i = 1 to 10 txt(i) = myApp.TimeSheet.Employee.NameNext I Performs better if rewritten using substitution:
Dim emp as New Employee' Create the substitution object variableSet emp = myApp.TimeSheet.EmployeeFor i = 1 to 10 txt(i) = emp.NameNext I 
Charlie has over a decade of experience in website administration and technology management. As the site admin, he oversees all technical aspects of running a high-traffic online platform, ensuring optimal performance, security, and user experience.
