IF This.Dorelease
         ?? chr(7)
         YN=MESSAGEBOX("是否离开",4+48=256,"信息窗口")
         IF YN=6                              -------------运行至此出现问题，请教是什么愿意
            IF this.formset
              thisformset.Release()
            ELSE
            thisform.Release()
            ENDIF
            IF this.iscove
               CLEAR EVENTS
            ENDIF
      ENDIF            
ENDIF