以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助] Button1点击事件 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=95461) |
||||
-- 作者:abc2363360 -- 发布时间:2017/1/20 11:51:00 -- [求助] Button1点击事件 窗口有两个控件 ComboBox1 Button1 Button1点击事件:点击后 如果 Button1标题为 锁定 Button1标题修改为“解锁” ComboBox1不允许编辑,关闭窗口再打开也不允许编辑 如果 Button1标题为 解锁 且 Button1标题为 解锁时只允许用户1和用户2点击 Button1标题修改为“锁定” ComboBox1允许编辑,关闭窗口再打开也不允许编辑
麻烦大神帮忙写写代码。 |
||||
-- 作者:有点色 -- 发布时间:2017/1/20 12:02:00 -- AfterLoad事件
If vars("锁定") = false Then e.Form.Controls("Button1").Text = "锁定" Else e.Form.Controls("Button1").Text = "解锁" End If e.form.controls("ComboBox1").Enabled = not vars("锁定")
Button1Click事件
vars("锁定") = not vars("锁定") If vars("锁定") = true Then e.Sender.Text = "解锁" e.form.controls("ComboBox1").Enabled = false Else e.Sender.Text = "锁定" e.form.controls("ComboBox1").Enabled = true End If [此贴子已经被作者于2017/1/20 12:03:25编辑过]
|
||||
-- 作者:abc2363360 -- 发布时间:2017/1/20 14:49:00 -- [求助] Button1点击事件 问题1、当前窗口打开时是可以锁定不让编辑了,但是关闭窗口重新打开后ComboBox1又可以编辑了,并且Button1标题还是显示解锁 问题2、Button1标题为 解锁时只允许用户1和用户2点击 这个代码未写。 再次麻烦大神帮忙。 |
||||
-- 作者:有点色 -- 发布时间:2017/1/20 14:59:00 --
|
||||
-- 作者:abc2363360 -- 发布时间:2017/1/20 15:54:00 -- [求助] Button1点击事件 关闭项目再重新打开又可以编辑了,还能再优化一下? |
||||
-- 作者:有点色 -- 发布时间:2017/1/20 15:55:00 -- 用这个方式存放值
http://www.foxtable.com/webhelp/scr/1544.htm
|