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

谢谢吹水佬老师,照你说的改后,确实能释放窗体了...