Foxtable(狐表)用户栏目专家坐堂 → 不取其他表已经被锁定的行


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

主题:不取其他表已经被锁定的行

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


加好友 发短信
等级:超级版主 帖子:107718 积分:547917 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/3/15 15:16:00 [显示全部帖子]

http://www.foxtable.com/webhelp/topics/1457.htm

比如

If e.IsFocusCell Then '如果是焦点所在单元格
    
If e.Col.Name = "县市" Then '如果正在编辑的是县市列
        '从行政区域表提取该省市的县市作为列表项目

        e.Col.Combolist = 
DataTables("行政区域").GetComboListString("县市""_locked = false")
    
End If
End
 
If

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


加好友 发短信
等级:超级版主 帖子:107718 积分:547917 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/3/15 17:20:00 [显示全部帖子]

表事件里不要使用Current

If mk > "" Then
dim dr as datarow = e.DataTable.Find("模块= '" & mk & "'")
If  dr IsNot Nothing AndAlso dr.Locked  = True  Then
MessageBox.Show("模块已被锁定行,无法被评估?","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
e.Cancel = True
End If
End If
End Select


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


加好友 发短信
等级:超级版主 帖子:107718 积分:547917 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/3/16 17:30:00 [显示全部帖子]

要达到什么效果?

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


加好友 发短信
等级:超级版主 帖子:107718 积分:547917 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/3/17 9:53:00 [显示全部帖子]

这个意思和您写的代码对不上号。换个方式,请详细描述一下要做什么功能?

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


加好友 发短信
等级:超级版主 帖子:107718 积分:547917 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/3/17 10:15:00 [显示全部帖子]

如果是要控制不能选择锁定的下拉项目,那就应该显示下拉项目的时候就排除掉锁定的项目,不显示在下拉列表中供选择,请参考2楼的用法

 回到顶部