不用API蔽屏Alt+F4

有时在编程时需要蔽屏Alt+F4，但是有不会调用API怎么办呢？

  只要在窗体的Unload事件中假如Cancel=-1即可

  Private Form_Unload()

      Cancel=-1

  End Sub

  但是这样就连使用窗体的关闭按钮都不能了，可以声明一个全局变量P As Boolean，在Form_Load中将P=False 在达到你所规定的条件后将它设置为True即可

Private Form_Unload()

If P=False Then

      Cancel=-1

End If

End Sub

以上程序在VB5+WINDOWS 98下编译通过.