如何使一个窗体始终显示在最前端？

Question

比如象WINDOWS记事本，打开“查找”窗体，焦点转移到文本编辑区，“查找”还是显示在前端，并且
“查找”窗体还必须是MDI子窗体

Answer 1

Public 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
'使用是把窗体的 ShowInTaskbar  设置为True
Public Sub FormFirst(F As Form)
Const SWP_NOMOVE = 2
Const SWP_NOSIZE = 1
Const HWND_TOPMOST = -1
Const HWND_NOTOPMOST = -2
SetWindowPos F.hwnd, HWND_TOPMOST, 0, 0, 0, 0, 3
End Sub

Answer 2

//焦点转移到文本编辑区，不能用 窗体.show vbmodal

Answer 3

我用SetWindowPos函数
把窗体设置成MDI子窗体就无效了啊
用窗体.show vbmodal  必须得等窗体卸载后在能进行其他窗体操作
还有谁能解决吗？

Answer 4

Private Sub Form_Load()
Form2.Show , Me
End Sub

Answer 5

tztz520(午夜逛街) ，把窗体设置成MDI子窗体
Private Sub Form_Load()
Form2.Show , Me
End Sub
就不能用了啊？！
设置成一般窗体，有时候在windows任务栏看不见，有时候看见了啊
我是要让那窗体在任务栏是看不见的

Answer 6

如果不想显示到任务栏中.就将这个窗口的ShowInTaskbar属性设为false