窗体关闭有关问题

窗体关闭问题
我有一个窗体，点击关闭按钮时，变为还原窗口模式大小，而关不掉，再点一次时才能关闭，请问各位高手怎么解决此问题？

[解决办法]
没有遇到过,如果代码不是太多的话，可以贴出来。
如果有QueryUnload事件在里面，可以检查一下这段。
[解决办法]
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
cancel=true
Me.WindowState = vbMinimized
End Sub

[解决办法]
Dim CloseFlg As Boolean

Private Sub Form_Load()
CloseFlg = False
End Sub

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
If Not CloseFlg Then
CloseFlg = True
Cancel = 1
'此处是还原窗口代码
End If
End Sub