关于VB6.0中子窗体的问题
我想要在MDI窗体中打开一子窗体,子窗体以最大化方式显示,且不能让用户改变窗体的大小(即一直以最大化显示)用户只能可以按窗体上的关闭按钮关闭窗体,其它最大化最小化按钮函数失效(或禁用也可)。谢谢高手指点。(我在子窗体load事件中用禁止最大化按钮时程序运行出错)。
我想要在MDI窗体中打开一子窗体,子窗体以最大化方式显示,且不能让用户改变窗体的大小(即一直以最大化显示)用户只能可以按窗体上的关闭按钮关闭窗体,其它最大化最小化按钮函数失效(或禁用也可)。谢谢高手指点。(我在子窗体load事件中用禁止最大化按钮时程序运行出错)。
if me.windowstate=0 or me.windowstate=1 then
me.windowstate=2
endif
我有个禁用关闭的api代码 如下:
'把X按钮屏蔽掉
'-----------禁止 ----------------------------
Dim hSysMenu As Long
Const MF_BYPOSITION = &H400
hSysMenu = GetSystemMenu(Me.hwnd, 0)
RemoveMenu hSysMenu, 6, MF_BYPOSITION
RemoveMenu hSysMenu, 5, MF_BYPOSITION