Foxtable(狐表)用户栏目专家坐堂 → [求助]排除列后,锁定行


  共有2097人关注过本帖树形打印复制链接

主题:[求助]排除列后,锁定行

帅哥哟,离线,有人找我吗?
天一生水
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1137 积分:11224 威望:0 精华:0 注册:2017/9/26 16:30:00
[求助]排除列后,锁定行  发帖心情 Post By:2018/1/31 21:42:00 [只看该作者]

表的PrepareEdit代码,不起作用,请老师看看错在哪里?谢谢!

 

If e.Row("审核") = True Then     ’如果逻辑列“审核”勾选了,其他列锁定,但“审核”列不锁定
    For Each c As Col In Tables("数据表").cols
        If c.name <> "审核" Then
            e.Cancel = True
        Else
            e.Cancel = False
        End If
    Next
End If


 回到顶部
帅哥哟,离线,有人找我吗?
y2287958
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:4628 积分:33772 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2018/1/31 21:48:00 [只看该作者]

e.Cancel = e.col.name <> "审核" 

 回到顶部
帅哥哟,离线,有人找我吗?
天一生水
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1137 积分:11224 威望:0 精华:0 注册:2017/9/26 16:30:00
  发帖心情 Post By:2018/1/31 22:02:00 [只看该作者]

大侠,这句看不懂,不会改,请指教!

 回到顶部
帅哥哟,离线,有人找我吗?
天一生水
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1137 积分:11224 威望:0 精华:0 注册:2017/9/26 16:30:00
  发帖心情 Post By:2018/1/31 22:09:00 [只看该作者]

谢谢大侠!可以了

For Each c As Col In Tables("数据表").cols
    If e.Row("审核") = True Then
        e.Cancel = e.Col.name <> "审核"
    Else
        e.Cancel = False
    End If
Next


 回到顶部
帅哥哟,离线,有人找我吗?
y2287958
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:4628 积分:33772 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2018/1/31 22:23:00 [只看该作者]

就用2楼一行代码即可

 回到顶部
帅哥哟,离线,有人找我吗?
天一生水
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1137 积分:11224 威望:0 精华:0 注册:2017/9/26 16:30:00
  发帖心情 Post By:2018/1/31 22:37:00 [只看该作者]

光用一行代码,我这里给锁住了,得这样才行。

 

If e.Row("审核") = True Then
        e.Cancel = e.Col.name <> "审核"   

End If


 回到顶部
帅哥哟,离线,有人找我吗?
y2287958
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:4628 积分:33772 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2018/1/31 23:04:00 [只看该作者]

 e.Cancel = e.Col.name <> "审核" AndAlso e.Row("审核") = True

 回到顶部