Question

VB 窗体失去焦点

在MDI子窗体中点击添加按钮出现一个窗体后（非MDI子窗体），如果不点击新出现的窗体上的关闭按钮则MDI窗体上不能获得焦点，且新出现的添加窗体会出现一些提示信息如抖动一下等，该怎么做呢？

Answer 1

先声明：
Private Declare Function GetForegroundWindow Lib "User32" () As Long
再在timer控件内写入如下代码:
If GetForegroundWindow <> Me.hWnd Then
Me.SetFocus
End If
timer属性interval设为100
或者调用模态窗体
form1.show 1

Answer 2

没办法,这是windows的消息传递机制,估计微软不会为你而改变....