!!!form右上脚的‘最大化’怎样去掉 我新建了一个窗口,但是想固定到这么大,请问怎样去掉右上脚的‘最大化’图标呐,谢谢 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 BorderStyle设置为3,如果需要最小化按钮,把MinButton设置为True 我知道的:1设置 MaxButton2设置 Form的BorderStyle属性 设置 Form的BorderStyle属性为 3 原来窗体的最大化按钮只能禁用而不可能去掉。唯一的办法就是自己重写标题栏。但是那样又何必呢?纵观大部分程序,如果不像窗体最大化,那最大化按钮都是灰色的。一般我是这样做的:BorderStyle属性设成1 - Fixed Singel,这样窗体标题栏就剩下一个关闭的×了。然后,MinButton属性设成Enable,MaxButton设成Disable,就可以了 我知道的:1设置 MaxButton2设置 Form的BorderStyle属性3APIPrivate Declare Function RemoveMenu Lib "user32" (ByVal hMenu As Long, ByVal nPosition As Long, ByVal wFlags As Long) As LongPrivate Declare Function GetSystemMenu Lib "user32" (ByVal hwnd As Long, ByVal bRevert As Long) As LonghMenu = GetSystemMenu(Me.hwnd, 0)RemoveMenu hMenu, SC_MAXIMIZE, MF_BYCOMMANDRemoveMenu hMenu, SC_SIZE, MF_BYCOMMAND 感谢大家,我试过了,使用这个MyMenu = GetSystemMenu(Me.hwnd, 0) 居然提示我溢出 很奇怪了 你的 MyMenu 变量是 Long 吗? 求助关于faxcom.dll的问题。 如何让一个Sub中的变量,在另一个Function中可用? 两个简单的问题,紧急求救! 用acess里面的vba读取dbf文件 呀来人呀!我受不了了呀! 播放mp3用什么控件? 请教一个Datagrid的问题? 为什么我在这里发帖的时候每次复制都要按两次Ctrl+V才复制上去? 如何在vb里调用web? 菜:判断控件属于集合的问题 [MSHFlexGrid]如何合并这样的单元格??? VB如何读取文本文档中的内容~~~~~~~~~~~
2设置 Form的BorderStyle属性
唯一的办法就是自己重写标题栏。但是那样又何必呢?纵观大部分程序,如果不像窗体最大化,那最大化按钮都是灰色的。一般我是这样做的:
BorderStyle属性设成1 - Fixed Singel,这样窗体标题栏就剩下一个关闭的×了。然后,
MinButton属性设成Enable,MaxButton设成Disable,就可以了
2设置 Form的BorderStyle属性
3API
Private Declare Function RemoveMenu Lib "user32" (ByVal hMenu As Long, ByVal nPosition As Long, ByVal wFlags As Long) As Long
Private Declare Function GetSystemMenu Lib "user32" (ByVal hwnd As Long, ByVal bRevert As Long) As LonghMenu = GetSystemMenu(Me.hwnd, 0)
RemoveMenu hMenu, SC_MAXIMIZE, MF_BYCOMMAND
RemoveMenu hMenu, SC_SIZE, MF_BYCOMMAND