mydates.release 第一次执行这句是正常的,只是form资源不能正常释放,Unload事件未被触发。
将 form Unload 事件的代码改到去 form Destroy 事件:
** form Destroy
IF USED("WDA1")
SELECT wda1
USE
ENDIF
RELEASE cts,cam
将 form Unload 事件的代码改到去 form Destroy 事件:
** form Destroy
IF USED("WDA1")
SELECT wda1
USE
ENDIF
RELEASE cts,cam