發(fā)布時間:2025-05-11 01:23:57
就是利用了一個API函數(shù),實現(xiàn)功能。Setwindowpos函數(shù)能為窗口指定一個新位置和狀態(tài)。它也可改變窗口在內(nèi)部窗口列表中的位置。
代碼如下。
==============
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 '定義API
Private Const HWND_TOPMOST = -1 '窗體最上層常數(shù)
Private Const SWP_NOMOVE = &H2 '窗體不移動(保持當前位置(x和y設定將被忽略))
Private Const SWP_NOSIZE = &H1 '窗體大小不變(保持當前大?。╟x和cy會被忽略))
Private Sub Form_Load() '程序一運行就執(zhí)行
SetWindowPos hwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE + SWP_NOSIZE '設置最上層窗口