Try setting the .Caption from the Text1.Valid clause and then executing a Refresh. Although your code may be executing correctly, nothing is triggering it to execute.
HTH!
Paul
Paul Watson MCV Computer Consultants MCV Global Systems, Inc. pWatson@PrimeNet.Com