Option ExplicitConst SWP_NOSIZE = &H1Const SWP_NOMOVE = &H2Const SWP_NOACTIVATE = &H10Const HWND_TOPMOST = -1Const HWND_NOTOPMOST = -2Const SWP_SHOWWINDOW = &H40Private 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 LongPrivate ShuX As IntegerPrivate Sub Form_Load()'窗体总在最前SetWindowPos hwnd, HWND_TOPMOST, 0, 0, 0, 0, _ SWP_NOACTIVATE Or SWP_SHOWWINDOW Or SWP_NOMOVE Or SWP_NOSIZEEnd Sub听说把上面的总在最前改一下,可以让窗体总在最后,具体怎么改谁知道

总在最前:SetWindowPos hwnd, -1, 0, 0, 0, 0, _ SWP_NOACTIVATE Or SWP_SHOWWINDOW Or SWP_NOMOVE Or SWP_NOSIZE 最后:SetWindowPos hwnd, -2, 0, 0, 0, 0, _ SWP_NOACTIVATE Or SWP_SHOWWINDOW Or SWP_NOMOVE Or SWP_NOSIZE

谢