简单的窗口问题？？

Question

文章：
http://www.hongen.com/pc/program/apitutor/api0011/api01.htm

Answer 1

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 LongPrivate Sub Form_Load()
    Const HWND_TOPMOST = -1
    Const SWP_SHOWWINDOW = &H40
    Const SWP_NOSIZE = &H1    SetWindowPos Me.hwnd, HWND_TOPMOST, vbNull, vbNull, vbNull, vbNull, SWP_NOSIZE
    
End Sub

Answer 2

怎样使一个窗口始终在最上方，是非模式的
-------------------------------------
应该是指工具窗体吧FrmTool.Show , FrmMain