Foxtable(狐表)用户栏目专家坐堂 → [求助]按钮ENABLED与否决定于某列的值


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

主题:[求助]按钮ENABLED与否决定于某列的值

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


加好友 发短信
等级:幼狐 帖子:135 积分:1088 威望:0 精华:0 注册:2015/3/16 16:42:00
[求助]按钮ENABLED与否决定于某列的值  发帖心情 Post By:2015/9/5 15:03:00 [只看该作者]

有一个窗体,窗体中有一个按钮叫“公示”。
有一个表SelfInquiry,表中有一个字段叫“询价状态”,它的自定义值为“草拟”和“已公示”。
目的:当表中询价状态的值为“已公示”时,窗体中的“公示”按钮则为灰色的不可CLICK。

窗体的AfterLoad

If Tables("SelfInquiry").Current("询价状态")= "已公示" AndAlso Tables("SelfInquiry").Current("询价状态")<> Nothing Then
    e.Form.Controls("公示").Enabled = False
End If

结果是,无论什么情况,“公示按钮”都是灰色。
请教,问题出在哪里呢?

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2015/9/5 15:19:00 [只看该作者]

If Tables("SelfInquiry").Current("询价状态")= "已公示" AndAlso Tables("SelfInquiry").Current("询价状态")<> Nothing Then
    e.Form.Controls("公示").Enabled = False
else
    e.Form.Controls("公示").Enabled = True
End If

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


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

CurrentChanged事件

 

If Forms("窗口1").Opened Then  
    If Tables("SelfInquiry").Current("询价状态")= "已公示" AndAlso Tables("SelfInquiry").Current("询价状态")<> Nothing Then
        Forms("窗口1").Controls("公示").Enabled = False
    Else
        Forms("窗口1").Controls("公示").Enabled = True
    End If
End If


 回到顶部