请问,如何使窗体的大小不能被改变? 不是,是borderstyle选择别的,别选择2。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 不错,在属性窗口的borderstyle中选择1,3,4都可以 选 bordersyle里面的1-Fixde single 俺也来蹭两分,你把bordersyle这个属性一个一个试试,相信,以后这些问题你不会再问了. 我想请问一句,如果我想窗体大小不能调整,但要有最小化,和关闭两个键,最大化键显示出来但是disable的,这样的怎么实现? Private Declare Function GetSystemMenu Lib "user32" _ (ByVal hwnd As Long, _ ByVal bRevert As Long) As LongPrivate Declare Function RemoveMenu Lib "user32" _ (ByVal hMenu As Long, _ ByVal nPosition As Long, _ ByVal wFlags As Long) As Long Private Const MF_REMOVE = &H1000&Private Const SC_MAXIMIZE = &HF030&Private Const SC_SIZE = &HF000&Private Sub MDIForm_Load()RemoveMenu GetSystemMenu(Me.hwnd, 0), SC_MAXIMIZE, MF_REMOVERemoveMenu GetSystemMenu(Me.hwnd, 0), SC_SIZE, MF_REMOVEend sub适用于MDI以及普通窗体。其实普通窗体用不着这么麻烦。 把窗体的borderstyle中选择1或3或4 excel指定单元格插入图片 VB一个小问题关于MSGBOX 水晶报表的每页求和问题,急! 大量视频教学下载。 到处都是灰,扫扫,顺便散点分 DLL 参数的回传问题!!!300分拉 ifix中不能直接用GetSetting吗? 控件问题 sql2005产品编号排序问题!!!! help me!!请问那里有卸载程序制作软件?(给分!!) 关于数据库安全的问题 如何用Internet Transfer 控件,下载需要登陆的网站上的内容
你把bordersyle这个属性一个一个试试,
相信,以后这些问题你不会再问了.
(ByVal hwnd As Long, _
ByVal bRevert As Long) As Long
Private Declare Function RemoveMenu Lib "user32" _
(ByVal hMenu As Long, _
ByVal nPosition As Long, _
ByVal wFlags As Long) As Long
Private Const MF_REMOVE = &H1000&
Private Const SC_MAXIMIZE = &HF030&
Private Const SC_SIZE = &HF000&Private Sub MDIForm_Load()
RemoveMenu GetSystemMenu(Me.hwnd, 0), SC_MAXIMIZE, MF_REMOVE
RemoveMenu GetSystemMenu(Me.hwnd, 0), SC_SIZE, MF_REMOVE
end sub
适用于MDI以及普通窗体。
其实普通窗体用不着这么麻烦。