1 return  0
2 IF  Wontop()#"MAINFORM" 
=MESSAGEBOX("请先退出其他窗口",16,"成本核算系统")
RETURN
ENDI

解决方案 »

  1.   

    第一个问题的回答:
    避免这个情况可以在在文本框的 Valid() 事件中写你所写的那些代码,就可以实现你所希望的效果了,但要注意在该段代码前最好要留出例外的出口条件,例如:如果你希望按 ESC 键可以将光标跳出,可以这样写:
    If Lastkey()<>27
       ...
       ...
       ...
    Endif