Nadya,

Try this one and see which one is fester.

LOCAL i, lnSec
lnSec=seconds()

for i=1 to 100000
   if type('oJC.Name')='C'
   endif
next

?seconds()-lnSec
lnSec=seconds()

for i=1 to 100000
  if vartype(oJC,Name)='C'
  endif
next
?seconds()-lnSec

BTW, Make sure that oJC does not exist. So how much faster is VarType() now?
Speed isn't everything you see .,,