彻底搞掂Access主窗体

zhouyunliang

Access主窗体有时特别讨厌，影响界面美观，下面的例子能支持以下功能

1、彻底隐藏主窗口上的最小化、最大化、关闭按钮，只能由用户定义的按钮退出，支持任务栏点击最小化和还原窗口

2、去除所有系统菜单和工具栏

3、能固定主窗口的位置和大小

通过以上措施，留下一个干净的界面给用户，看不出Access的痕迹

游客，如果您要查看本帖隐藏内容请回复

slap

wu8313

我修改了楼主的部分代码，把固定窗口代码 改为了 最大化。(最大化用的比较多，所以这样做)
-------------------------------------------------------------
增加了设置acc选项的代码，一并设置acc的环境。
Private Sub Setopt() '设置acc选项
'还可以继续进行补充，可是关于这个 SetOption 方法的更多参数我也不知道如何表述和设置值
On Error Resume Next
Application.SetOption "Show Startup Dialog Box", False    ' 不显示启动任务窗口
Application.SetOption "Confirm Record Changes", False    '确认，记录更改
Application.SetOption "Confirm Document Deletions", False    '确认，删除文档
Application.SetOption "Confirm Action Queries", False    '确认，操作查询
Application.SetOption "Auto Compact", True
Application.SetOption "Show Hidden Objects", False
Application.SetOption "Show Status Bar", False
End Sub
-------------------------------------------------------------------
修改后的附件如下：

[ 本帖最后由 wu8313 于 2008-7-24 19:02 编辑 ]

rjacky

谢谢分享，因为任务栏还是有那个"该死"的access图标，所以还是不能说看不出access的痕迹

goto2008

[:24]

rcylbx

学习了

zhouyunliang

没有上传任务栏图标文件，所以看到的还是Access图标，可以自己定义AppIcon的图标路径

ynjxw

没有必要躲躲藏藏的吧！

7777777

DDDDDDDDDDD

7777777

DDDDDDDDDDDDDD

xuwenning

学习了

[:21]
[:49]