2、 http://www.foxtable.com/webhelp/scr/1552.htm
3、
If Tables("表A").rows.count=0 Then e.Form.closeEnd If