1、保存成功这样写
DataTables("表A").SaveIf DataTables("表A").HasChanges = False Then msgbox("保存成功")End If
2、如果要加上几秒后消失,参考
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=66974&skin=0