主题：控件权限不知是否是BUG

下面代码分别写在控件CLICK 和 ENTER 里面  控件COMBOBOX 能权限控制正常，

 

但同样的代码写在控件DateTimePicker 的同样CLICK 和 ENTER里面就不行，虽然提示，但能修改

 

如果CLICK里面不写IF......的代码，ENTER能实现控件的权限控制

 

CLICK

If _UserGroupp = "总经理" OrElse _UserGroupp = "副总"  Then 
    Dim dtp As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker3")
dtp.Value = Date.Now
Else
    MessageBox.show("你无操作权限!")
End If

 

DateTimePicker

If _UserGroupp = "总经理" OrElse _UserGroupp = "副总"  Then  
    e.Sender.ReadOnly = BooleanEnum.False '允许编辑
Else
    e.Sender.ReadOnly = BooleanEnum.True  '禁止编辑
End If

我测试没问题。实例发上来

请老师测试，测试窗口“控件权限设置” ，日期控件，虽然已提示，但依然可修改数据

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:控件测试.zip

不要弹出提示框'MessageBox.show