会员登录 - 用户注册 - 网站地图 Office中国(office-cn.net),专业Office论坛

【美观】Access窗体半透明的做法

时间:2013-09-07 16:16 来源:Office中国 作者:admin 阅读:
软件类型:国产软件 授权方式:免费软件 界面语言:简体中文 软件大小:23 KB 文件类型:.rar 运行环境:Win2003,WinXP,Win7,Win8 软件等级:★★★★☆ 发布时间:2013-09-07 插件情况:无插件,请放心使用。 下载次数:
软件介绍:
窗体是呈现给用户的界面,美观的界面能让用户用得更加舒适,给软件争分不少。
win7 系统的诞生给我们的第一感觉就是美,虚幻。因为用了很多半透明的窗口。
Access软件也能开发出半透明或者全透明的窗口。


Public Sub SetFormOpacity(frm As Form, sngOpacity As Single)
    Dim lngStyle As Long
    ' get the current window style, then set transparency
    lngStyle = GetWindowLong(frm.hwnd, GWL_EXSTYLE)
    SetWindowLong frm.hwnd, GWL_EXSTYLE, lngStyle Or WS_EX_LAYERED
    SetLayeredWindowAttributes frm.hwnd, 0, (sngOpacity * 255), LWA_ALPHA
End Sub
顶一下
(3)
100%
踩一下
(0)
0%
下载地址:
注意事项:

☉推荐使用第三方专业下载工具下载本站软件,使用 WinRAR v3.10 以上版本解压本站软件。
☉如果这个软件总是不能下载的请点击报告错误,谢谢合作!!
☉下载本站资源,如果服务器暂不能下载请过一段时间重试!
☉如果遇到什么问题,请到本站论坛去咨寻,我们将在那里提供更多 、更好的资源!
☉本站提供的一些商业软件是供学习研究之用,如用于商业用途,请购买正版。

发表评论
请自觉遵守互联网相关的政策法规,严禁发布色情、暴力、反动的言论。
评价: