主题：如何实现这种效果谢谢！！！

你点:"无" 时要什么结果?不明白,本身无,就是没有了

单位基本信息录入窗口中-单位名称边的按钮代码改一下
if CurrentTable.Current.Locked Then  '判断当前行是否锁定
    Return  '锁定就终止代码的执行
Else      '为锁定就执行以下代码
Forms("单位名称目录").Open()    '这儿原是:Forms("单位名称目录4").Open() 
e.Cancel = True
End If

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:人事工资管理系统.table

这个文件和你的数据库文件放在一起后再打开,或是重新做数据库的链接