<<< 返回 access911.net 编程静态资料库索引页

如何禁止Access主窗体右上角的退出按钮?(用代码使ACCESS主窗体上的"X"失效)

 

作者:cg1  摘自:access911.net  录入:cg1  时间:2002-11-21  浏览人次:1437


专题地址:http://access911.net/fixhtm/74FAB41E.htm 如果需要更详细的评论或说明,请点击该地址。

 

简述:如何禁止Access主窗体右上角的退出按钮?(用代码使ACCESS主窗体上的"X"失效)《窗体》

 


问题:

如何禁止Access主窗体右上角的退出按钮?
用代码使ACCESS主窗体上的“X”失效

 

 

回答:

在程序开始的窗体里加入: 
Private Declare Function GetSystemMenu Lib "User32" (ByVal hwnd As Long, ByVal bRevert As Long) As Long 
Private Declare Function DeleteMenu Lib "User32" (ByVal hMenu As Long, ByVal nPosition As Long, ByVal wFlags As Long) As Long 

Private Sub FORM_Load() 

  Const MF_BYCOMMAND = &H0& 
  Const SC_CLOSE = &HF060    ''恢复按钮的ID是:&HF120
  Dim h.....................
...........

资料库随时有更新,欲查看最新详情请单击专题地址http://access911.net/fixhtm/74FAB41E.htm

 


上一篇:如何得知一个月有多少天?

下一篇:如何使用ADOX/DAO刷新/更新/删除并重定义链接表 

2017年2月22日生成静态资料