请教在关闭窗体的过程中代码失效应如何解决

Question

在窗体关闭按钮中(窗体右上前的红色关闭按钮)写入了一个关闭事件,但老是失效,自做的关闭按钮却能执行成功,
代码如下:
Private Sub Form_Close()
    AddhowDolog "关闭" & hjfgl
End Sub
请各位大师指点下应如何对关闭按钮写入事件
   AddhowDolog "关闭" & hjfgl
谢谢了!!

Answer 1

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)End Sub

Answer 2

Private Sub Form_Close()
    unload me  
    AddhowDolog "关闭" & hjfgl
End Sub

Answer 3

Private Sub Form_Close()
  unload me 
  AddhowDolog "关闭" & hjfgl
End Sub