Tables("表A").Appearance.ShowLockColumnIcon = FalseTables("表A").Refresh
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=64771&skin=0