Foxtable(狐表)用户栏目专家坐堂 → 锁定排除


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

主题:锁定排除

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


加好友 发短信
等级:九尾狐 帖子:2466 积分:22761 威望:0 精华:0 注册:2011/3/29 17:14:00
锁定排除  发帖心情 Post By:2018/3/9 17:09:00 [只看该作者]

If e.DataRow("审核") = True Then '已经审核通过的行
    e.DataRow.Locked  = True  '如果此行已锁定,也就是准备取消锁定此行
需要排除 编辑 列  不被锁定
End If

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/3/9 18:30:00 [只看该作者]

要在click或者doubleclick,写代码

 

If e.col.name = "第一列" Then
    e.Table.StartEditing

End If

[此贴子已经被作者于2018/3/9 18:30:10编辑过]

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


加好友 发短信
等级:九尾狐 帖子:2466 积分:22761 威望:0 精华:0 注册:2011/3/29 17:14:00
  发帖心情 Post By:2018/3/9 20:01:00 [只看该作者]

这是一个网页链接  解锁后还需要保持网页开启功能
下面的代码不能打开网页


 If e.col.name = "第一列" Then

    e.Table.StartEditing

End If


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


加好友 发短信
等级:超级版主 帖子:107861 积分:548662 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/3/9 20:24:00 [只看该作者]

doubleclick事件

If e.col.name = "第一列" Then

    e.Table.StartEditing

End If


click事件


If e.col.name = "第一列" Then

    Dim Proc As New Process '定义一个新的Process

Proc.File = e.row("第一列") '指定要打开的网页地址
Proc.Start()

End If


 回到顶部