Office中国论坛/Access中国论坛

标题: 窗体最大化遇到的问题求教 [打印本页]

作者: zhuerw 时间: 2002-5-9 05:24
标题: 窗体最大化遇到的问题求教
照抄　Alex　的窗体效果，用系统的菜单没有问题，只用自己的自定义菜单，窗体与菜单间的约1CM的空间太难看，怎么也去不掉，请教各位，怎样解决？（见附件）

作者: zhuerw 时间: 2002-5-9 05:44
文件下载
因文件过大，刚才未传上，现删除图片后传上。
原代码为：
Private Sub Form_Load()
'=============================================================
'刘小军, 2002-04-12
'=============================================================
Dim I, J As Integer
'最大化窗口，不显示系统状态栏
Access.SetOption "Show Status Bar", False
DoCmd.RunCommand acCmdAppMaximize

docmd.maximize
I = Me.WindowWidth
J = Me.WindowHeight
DoCmd.Restore
DoCmd.MoveSize 0, 0, I, J

'打开屏幕刷新
Application.Echo True

End Sub

只用

docmd.maximize

'打开屏幕刷新
Application.Echo True
可以，但其他窗体也最大化了。

作者: whiky 时间: 2002-5-9 06:11
我用自定义的方法把系统内置的工具栏啊...其他什么栏之类的都不要他显示，这样就不会有1CM的空间了。alex的办法确实不错。

作者: zhuerw 时间: 2002-5-9 16:37
能否具体说一下？

作者: zhuerw 时间: 2002-5-10 00:15
实际上我就是只显示自定义才出现这种问题。
Alex　在窗体的“关于”上说明适用于　2000和XP，不知是WIN2000和XP还是Access2000和XP？

作者: zhuerw 时间: 2002-5-10 02:04
问题已经解决。工具栏中一个勾也不要。

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)