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

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

专题地址：http://access911.net/index.asp?u1=a&u2=74FAB41E 如果需要更详细的评论或说明，请点击该地址。

简述：如何禁止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/index.asp?u1=a&u2=74FAB41E

上一篇：如何得知一个月有多少天？

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

2007年12月25日生成静态资料