Foxtable(狐表)用户栏目专家坐堂 → 窗口审核


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

主题:窗口审核

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/13 17:15:00 [显示全部帖子]

 编写 CheckBox1  和 CheckBox2 的选中事件,控制区域控件的可用性

 

 比如 e.Form.Controls("CheckCombox1").Enabled = False


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/13 17:40:00 [显示全部帖子]

 对应的设置值啊,你选择任意一个的时候,对应写能否使用啊

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/13 17:45:00 [显示全部帖子]

都一样,就一句代码啊,写到对应的控件,做对应的设置

 

If e.sender.checked Then
    e.form.controls("ComboBox2").enabled = False
Else
    e.form.controls("ComboBox2").enabled = True
End If

 


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/18 10:57:00 [显示全部帖子]

呃,不知道你想表达什么

 

If e.Sender.Text = "某值" Then
    e.form.controls("ComboBox2").enabled = False
Else
    e.form.controls("ComboBox2").enabled = True
End If


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/18 15:07:00 [显示全部帖子]

If e.form.controls("TextBox1").Text <> _Username Then
    e.form.controls("ComboBox2").enabled = False
Else
    e.form.controls("ComboBox2").enabled = True
End If

 回到顶部