<<< 返回 access911.net 编程静态资料库索引页

API 函数集锦

 

作者:  摘自:  录入:cg1  时间:2002-11-19  浏览人次:2241


专题地址:http://access911.net/fixhtm/71FAB61E.htm 如果需要更详细的评论或说明,请点击该地址。

 

简述:

 


API 函数集锦 

API 函数在 VB 中得到了充分的运用,同时也让无数 VB 爱好者沉溺于其中。幸运的是 ACCESS 使用的 VBA 也能很好的引入 API 函数

1、如何让窗体总在最前面?

*API函数声明
Declare Function SetWindowPos Lib "user32" ( ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
注释:常量声明
Private Const SWP_NOSIZE = &H1
Private Const SWP_NOMOVE = &H2
Private Const HWND_TOPMOST = -1
Private Const HWND_NOTOPMOST = -2
注释: 在某个form里写:
SetWindowPos me.hWnd,WND_TOPMOST,0,0,0,0, SWP_NOMOVE 注释:或下面
SetWindowPos me.hWnd,WND_TOPMOST,0,0,0,0, SWP_NOSIZE

2.....................
...........

资料库随时有更新,欲查看最新详情请单击专题地址http://access911.net/fixhtm/71FAB61E.htm

 


上一篇:如何在VBA程序中将窗体的 Recordset 对象赋值给变量。如何绑定窗体数据源到Recordset?

下一篇:如何使用 ADO 來压缩或修复 MS Access 文件?(jro的使用)

2017年2月22日生成静态资料