Too slow

[Joel]

In my Task form, I run this sub:

Sub Item_CustomPropertyChange(ByVal strName)
Set prps = Item.UserProperties
If prps("HeatBarrier") = "True" Then
.......

I have many if prps statements. It's really slow. Takes about 10 seconds
to go from field to field within my form.

Can you suggest an alternative to make it go faster.

Thanks - Joel

 

[Duncan McCreadie]

I am not usre quite what you are trying toa chieve as the CustomProperty str
Name is not being used in your IF statement. I would use a SELECT CASE
clause if the userproperties are being changed in line with the
CustomPropertyChange event e.g.

Select Case strName
Case "HeatBarrier"
....

HTH

Duncan

 

[Joel]

Thanks.

Would this work?:

Dim HeatBarrierString

Select HeatBarrierString
Case "HeatBarrier"

If HeatBarrierString = "True" Then
...........................
end if

If HeatBarrierString = "False" Then
...........................
end if

Thanks for your help with the syntax
-Joel