Access数据库培训
网站公告
·Access快速平台QQ群号:277422564    ·Access快速开发平台下载地址及教程    ·欢迎添加微信交流账号:Accessoft7    ·如何快速搜索本站文章|示例|资料!    
您的位置: 首页 > 技术文章 > Access开发平台

access开发平台--窗体按钮按下不弹出的Bug解决方法\按钮凹陷不起来了

时 间:2011-10-22 09:16:51
作 者:红尘如烟   ID:10768  城市:上海
摘 要:Access开发平台--窗体按钮按下不弹出的Bug解决方法
正 文:

    Bug描述:Access开发平台里面主界面中按钮如果打开一个弹出窗体,则主界面中菜单按钮处于凹陷状态不能恢复,并且会显示出隐藏和关闭两个按钮。如图:

修正方案:

将下面的函数添加到模块中即可。

Function MouseOnClick(CmdNumber As Integer)
    MouseOnClick = [Microsoft Access Help].MouseOnClick(CmdNumber)
     With Forms!usysfrmMain
        If !frmChild.SourceObject = "usysfrmButton" Then

            !frmChild.Form("lab" & CmdNumber).SpecialEffect = 0

            !cmd9.Visible = False

            !cmd10.Visible = False

        End If

    End With

End Function



Access快速开发平台QQ群 (群号:84825014)       access源码网店

最新评论 查看更多评论(3)

2018/6/13 11:04:07李振兴
最好的方法是把控件的特殊效果一下就好了,无需代码

2011/10/22 9:25:47麥田
管用

2011/10/22 9:25:35杜超
正需要,非常感谢

发表评论您的评论将提升作者分享的动力!快来评论一下吧!

用户名:
密 码:
内 容:
 

常见问答

技术分类

相关资源

最新帖子

关于我们 | 服务条款 | 在线投稿 | 友情链接 | 网站统计 | 网站帮助