# Re: 请问 SetFocus 与 LostFocus 之间程式控制问题

Posted by learner on September 16, 1998 at 07:29:23:

In Reply to: Re: 请问 SetFocus 与 LostFocus 之间程式控制问题 posted by AndyLin on September 14, 1998 at 17:02:16:

: : 程式上设 Text1.text 与 Text2.text 一开始Text1.SetFocus 输入完资料后
: : Text1.Lostfocus 检核有误时在判断条件下加 TEXT1.SetFocus 此时无法停
: : 留在Text1的栏位上而会至Text2的栏位上(Text2一样有设定LostFocus).
: : 请问有无方法控制这种情况
: 建议你在text1,text2事件中设定中断点, 看看程式判断之流程,及lostfocue 和 setfocus 时之顺序,应该可以解决你的问题

如果可以的话,贴上你的程式码,我帮你看看,我上次也有遇到这个问题,
基本上,你在程式设计时,用中断点去做执行,有时候不会准,而且当你把它编译成执行档
时,执行的结果,也可能跟当初设计时的结果不一样
程式一开始在TEXT1_GotFocus,当你点到Text2时,你的理想是:Text1_LostFocus ->
Text2_GotFocus -> Text2_LostFocus -> Text1_GotFocus
可是实际在Run的时候有可能是 Text2_GotFocus -> Text1_LostFocus -> Text2_LostFocus
-> Text1_GotFocus
所以癈话不多说,你先再 Text2_GotFocus 的第一行加上 DoEvents 试试看

以上观念若有错误,敬请指教!

Follow Ups:

- Re: 请问 SetFocus 与 LostFocus 之间程式控制问题 jeck 22:41:59 9/16/98 (1)
  - Re: 请问 SetFocus 与 LostFocus 之间程式控制问题(to learner) jeck 22:46:40 9/16/98 (0)