安徽彩票大奖 欧洲百万乐透大奖 七星彩17049规律大奖 双色球中大奖领奖过程 3d近期中大奖故事 广州番禺中福彩大奖的 鸡男注定会中大奖 2016江苏彩民中大奖 趣彩网大奖网黑平台 大乐透4.97亿大奖 霍邱一彩民6元中双色球547万大奖 双色球黑龙江中大奖图 体育彩票中大奖名单 什么样的人能中大奖 彩票大奖作假

如何去掉Access窗体最大化后右上角的还原按钮

2003-08-30 22:32:00
lijiawy-Office交流网
原创
1480

问题:

如何去掉Access窗体最大化后右上角的还原按钮

如去不掉,有否其它变相实?#22336;?#27861;,不想用户能通过还原按钮将窗口还原
 

完整的解决方法还没有

以下是ACCESS911上的方法, 虽然可以去掉,但是主界面不能随ACCESS的主窗口的大小而改变,有谁能解决,欢迎讨论。
 
建立一个窗体,窗体的边框样式改为“无”,并且输入以下代码:
Private Sub Form_Current()
    
    Dim FormWidth, FormHeight As Integer
    'DoCmd.RunCommand acCmdAppMaximize '将access界面最大化
    DoCmd.Maximize
    FormWidth = Me.WindowWidth
    FormHeight = Me.WindowHeight
    DoCmd.Restore
    DoCmd.MoveSize 0, 0, FormWidth, FormHeight

End Sub

徐阿鹏
在窗体设计,中将窗体-》格式-》最大最小化按钮设为无
 
kunlun
我试了用这?#22336;?#27861;可去掉还原按钮,但是会有一个难看的框出现,不知哪位还有更高的方法呀

zhengjialon
完全解决的方法,暂时还没有?#19994;健?#26368;好的办法只能是4楼的办法。

leoyan76
Dim i As Integer
    Dim j As Integer
    Application.Echo False
    
    DoCmd.RunCommand acCmdAppMaximize
    DoCmd.Maximize
    i = Me.WindowWidth
    j = Me.WindowHeight
    DoCmd.Restore
    DoCmd.MoveSize 0, 0, i, j
    
    Application.Echo True

(界面_窗体_子窗体-相关文章技巧链接):
获取和设置ACCESS主窗体大小及位置代码
 

分享
? 1999-2019 Office交流网?? 中山市天鸣科技发展有限公司 粤ICP备10043721号-5 SQL查询:19
内存占用:7.75MB
PHP 执行时间:0.18
双色球大奖2000年
安徽彩票大奖 欧洲百万乐透大奖 七星彩17049规律大奖 双色球中大奖领奖过程 3d近期中大奖故事 广州番禺中福彩大奖的 鸡男注定会中大奖 2016江苏彩民中大奖 趣彩网大奖网黑平台 大乐透4.97亿大奖 霍邱一彩民6元中双色球547万大奖 双色球黑龙江中大奖图 体育彩票中大奖名单 什么样的人能中大奖 彩票大奖作假