Foxtable(狐表)用户栏目专家坐堂 → [求助]请问一下为何禁止修改没有效果啊?


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

主题:[求助]请问一下为何禁止修改没有效果啊?

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


加好友 发短信
等级:童狐 帖子:236 积分:1922 威望:0 精华:0 注册:2017/10/1 12:15:00
[求助]请问一下为何禁止修改没有效果啊?  发帖心情 Post By:2017/10/8 9:32:00 [显示全部帖子]

想禁止修改表中已经输入的列,代码如下:
If e.Row("报告编号") <> ""  Then

    e.Cancel = True
End
If


不知道对不对,反正运行没有效果,老师给看一下应该怎么弄。


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


加好友 发短信
等级:童狐 帖子:236 积分:1922 威望:0 精华:0 注册:2017/10/1 12:15:00
  发帖心情 Post By:2017/10/8 13:19:00 [显示全部帖子]

是的,我是在窗口里输入的,改了一下在leave事件里
With Forms("理化检测").Controls("textbox9")
    If .Value IsNot Nothing Then
        Tables("理化检测_table3").Current.DataRow.RejectChanges()
        Messagebox.Show("不允许更改报告编号!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
         End If
    
End With

结果已有值的是不能修改了,但没有值的也添加不上了,老师看看应该怎么写?

 回到顶部