将access弹出窗体加入到任务栏
时 间:2010-08-25 17:36:53
作 者:红尘如烟 ID:10768 城市:成都
摘 要:正常情况下,一般窗体可以在Access系统环境设置中来设置是否在任务栏中显示打开的窗体,但如果将窗体设为弹出之后就不能在任务栏显示了,这里通过调用API函数实现将Access弹出窗体加入到任务栏
正 文:
正常情况下,一般窗体可以在Access系统环境设置中来设置是否在任务栏中显示打开的窗体,但如果将窗体设为弹出之后就不能在任务栏显示了,这里通过调用API函数实现将Access弹出窗体加入到任务栏
Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long '=================================================================== '函数名称: AddPopupFormToTaskbar '功能描述: 将Access弹出窗体加入到任务栏 '输入参数: 参数1 PopupForm 必需的,弹出窗体对象 '返回参数: 无 '兼 容 性: '使用示例: AddPopupFormToTaskbar Me '相关调用: GetWindowLong() SetWindowLong() '作 者: 红尘如烟 '创建日期: 2009-4-20 '=================================================================== Public Function AddPopupFormToTaskbar(PopupForm As Form) SetWindowLong PopupForm.hwnd, -20, GetWindowLong(PopupForm.hwnd, -20) or &H40000 End Function |
Access软件网QQ交流群 (群号:54525238) Access源码网店
常见问答:
技术分类:
源码示例
- 【源码QQ群号19834647...(12.17)
- 【Access选项卡示例】Ac...(09.09)
- 【Access源码示例】按输入...(09.02)
- 【Access日期区间段查询】...(08.29)
- 【Access日期区间段查询】...(08.27)
- Access怎样才能实现日期时...(08.21)
- 【Access定时打开查询】A...(08.19)
- Access生成固定数量的记录...(08.13)
- Access怎样才能实现日期时...(08.12)
- Access利用导航窗体控件对...(08.03)
学习心得
最新文章
- Access表中的字段名、字段标题...(09.19)
- Access快速开发平台--更改“...(09.18)
- 【中秋及国庆优惠】Access培训...(09.15)
- Access如何将日期型的数值转换...(09.14)
- 英文输入法输入数据中存在单引号引起...(09.11)
- 【Access选项卡示例】Acce...(09.09)
- 让Access光标停留在指定的控件...(09.07)
- 关于Access查询条件里使用通配...(09.06)
- Access报表偷懒制作法--Ac...(09.05)
- Access快速开发平台--窗体数...(09.04)