Foxtable(狐表)用户栏目专家坐堂 → 求助代码怎么修改。。


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

主题:求助代码怎么修改。。

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


加好友 发短信
等级:小狐 帖子:318 积分:3448 威望:0 精华:0 注册:2012/4/24 14:47:00
求助代码怎么修改。。  发帖心情 Post By:2016/3/29 22:13:00 [只看该作者]

If e.Col.Name = "某列" Then  '如果编辑的是某列
    If e.Row.IsNull("某列") = False Then '而且某列已经有内容
       e.Cancel = True '则取消编辑
    End
If

End
If

这个要是有两列或者三列应该怎么修改呢 谢谢

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/3/29 22:53:00 [只看该作者]

If e.Col.Name = "第一列" Then  '如果编辑的是某列
    If e.Row.IsNull("第二列") = False AndAlso e.Row.IsNull("第三列") = False Then '而且某列已经有内容
       e.Cancel = True '则取消编辑
    End If
End If

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/3/29 22:54:00 [只看该作者]

If e.Col.Name = "第一列" OrElse e.Col.Name = "第四列" Then  '如果编辑的是某列
    If e.Row.IsNull("第二列") = False Then '而且某列已经有内容
       e.Cancel = True '则取消编辑
    End If
End If

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


加好友 发短信
等级:小狐 帖子:318 积分:3448 威望:0 精华:0 注册:2012/4/24 14:47:00
  发帖心情 Post By:2016/3/30 11:48:00 [只看该作者]

老师好 请问如果要是希望某一个表达到这个效果(整个表里所以的单元格都是空白可以填入,但是有数据后就不可以修改) 应该改成什么样子呢 谢谢

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/3/30 11:53:00 [只看该作者]

If e.Row.IsNull(e.Col.Name) = False Then

    e.Cancel = true

End If


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


加好友 发短信
等级:小狐 帖子:318 积分:3448 威望:0 精华:0 注册:2012/4/24 14:47:00
  发帖心情 Post By:2016/3/30 12:00:00 [只看该作者]

谢谢谢谢 你们这么好 越来越依赖了可怎么办…

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


加好友 发短信
等级:小狐 帖子:318 积分:3448 威望:0 精华:0 注册:2012/4/24 14:47:00
  发帖心情 Post By:2016/4/17 15:33:00 [只看该作者]

老师 假如要是有一列是逻辑列 那么逻辑列就直接不能编辑了 怎么办

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/17 23:47:00 [只看该作者]

以下是引用北冰洋在2016/4/17 15:33:00的发言:
老师 假如要是有一列是逻辑列 那么逻辑列就直接不能编辑了 怎么办

 

那你就不要限制

 

If e.Col.Name <> "某逻辑列" Then

   

End If


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


加好友 发短信
等级:小狐 帖子:318 积分:3448 威望:0 精华:0 注册:2012/4/24 14:47:00
  发帖心情 Post By:2016/4/26 10:48:00 [只看该作者]

请问老师 在窗口中怎么实现这个效果啊  就是 空白的话可以输入,有数据的话就禁止编辑

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/26 10:50:00 [只看该作者]

Enter事件

 

If e.sender.text > "" Then
    e.sender.ReadOnly = BooleanEnum.True
Else
    e.Sender.ReadOnly = BooleanEnum.false
End If


 回到顶部