设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

12下一页
返回列表 发新帖
查看: 2146|回复: 11
打印 上一主题 下一主题

[模块/函数] 控件的凹凸效果,用代码怎么写的,请问?

[复制链接]
跳转到指定楼层
1#
发表于 2004-2-8 19:06:00 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
[em03]
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2004-2-8 19:13:00 | 只看该作者
直接在控件的属性内有特殊效果选一下就行,不用代码
3#
 楼主| 发表于 2004-2-8 19:20:00 | 只看该作者
呵HHHHHHH
不是啦,我是想当运行是,我把鼠标放移到它上面时,你就凸,没有时,就平面的.这样的效果
4#
发表于 2004-2-8 19:40:00 | 只看该作者
做一个平面键,做一个凸键,当鼠标聚焦时就显示凸键,隐藏平面的,失焦时就显示平面键,隐藏凸键
当然,在FORM。LOAD事件中隐藏凸键


Me.凸键.Visible = True  ‘等于TRUE为可见,等于FALSE为不见


[此贴子已经被作者于2004-2-8 11:44:16编辑过]

5#
 楼主| 发表于 2004-2-8 19:47:00 | 只看该作者
谢谢!
6#
 楼主| 发表于 2004-2-8 23:30:00 | 只看该作者

不好意思,我试过,不行呀!

我对某个控件的代码:  If Me.控件.SetFocus = True Then
                                Me.cmdclose.Visible = True
                              Else
                                Me.cmdclose.Visible = False
                              End If
是不是这们做?我这样做的,系统就会提示没有函数或变量.
setFocus的值是什么类型的?
7#
发表于 2004-2-9 00:16:00 | 只看该作者
http://www.office-cn.net/bbs/dispbbs.asp?boardID=9&ID=4790

这个例子和你的类似
8#
发表于 2004-2-9 00:36:00 | 只看该作者
在该控件的移动事件中修改该控件的SpecialEffect属性就是了。当然移出时还需在其隔壁的鼠标移动事件中改回来。
9#
发表于 2004-2-9 01:04:00 | 只看该作者

SpecialEffect属性在哪定义?

SpecialEffect属性在哪定义?
10#
发表于 2004-2-13 00:48:00 | 只看该作者
再顶一下
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-11-6 21:43 , Processed in 0.099876 second(s), 35 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表