VB让窗体始终处于最前面

应用SetWindowPos函数可以设置一个窗口的位置和状态，本例正是利用此函数来把一个窗体放在所有窗体之上，使之总是处于最前面。

　　我们先来看看SetWindowPos函数的定义和参数：

　　使用API函数之前必须先在程序中声明如下：

Private 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　　
　　其中各参数的意义如下:

参数意义hwnd Long欲定位的窗口 hWndInsertAfter Long窗口句柄。在窗口列表中，窗口hwnd会置于这个窗口句柄的后面x，y Long窗口新的x,y坐标cx，cy Long指定新的窗口宽度和高度wFlags Long包含了旗标的一个整数，是下列之一 返回值 Long非零表示成功，零表示失败
　　下面是部分wFlags参数和它们的意义：

参数 意义和使用方法SWP_DRAWFRAME围绕窗口画一个框SWP_HIDEWINDOW隐藏窗口SWP_NOACTIVATE不激活窗口SWP_NOMOVE保持当前位置 (x和y设定将被忽略) &H2SWP_NOREDRAW窗口不自动重画SWP_NOSIZE保持当前大小 (cx和cy会被忽略) &H1SWP_NOZORDER保持窗口在列表的当前位置 (hWndInsertAfter将被忽略)SWP_SHOWWINDOW显示窗口 &H40SWP_FRAMECHANGED 强迫一条WM_NCCALCSIZE消息进入窗口，即使窗口的大小没有改变
　　函数的使用很简单&#x