在客户资料窗口根据需要设按钮:
解锁:
Tables("客户资料_Table1").AllowEdit=True
锁定:
Tables("客户资料_Table1").AllowEdit= False
锁定/解锁:
Tables("客户资料_Table1").AllowEdit= Not Tables("客户资料_Table1").AllowEdit
加好友 
发短信
Post By：2011/7/7 20:48:00 [显示全部帖子]
