IF TEXT0 HAS FOCUS SYNTAX 1

[KUZZ]

I need to write the following expression

++++++++++++ON TIMER+++++++++++++
VirtTime = 1 + VirtTime

Select Case VirtTime
Case Is = 4
If ME!NOTES "does not have focus" then
TEXT0.SETFOCUS
END IF

END SELECT

What would be the right code for this expression?



Good luck,
Kuzz

"Time spent debating the impossible subtracts from the time during which you
can try to accomplish it."

 

[rdodge]

If Me.ActiveControl.Name <> &quot;TEXT0&quot; Then
Me.TEXT0.SetFocus
End If

Ronald R. Dodge, Jr.
Production Statistician
Master MOUS 2000
When the going gets tough, the tough gets going.