knrt.net
当前位置:首页 >> vB窗体让关闭按钮无效 >>

vB窗体让关闭按钮无效

不要使用系统默认的标题栏,自己用Label画一个标题栏,能显示软件的名称就可以了,简单实用

Private Declare Function DeleteMenu 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

1、单击窗体form(使窗体处于选中状态)2、在右边的“属性”栏中设置: 1)、controlbox = true (true代表显示关闭按钮,false代表隐藏)扩展: 2)、maxbutton = false (false代表隐藏最大化,true代表显示) 3)、minbutton = false (flase代表隐藏最小化,true代表显示) 4)、borderstyle = 1 - fixed (代表不能通过拉动来改变窗体的大小)

步骤:1.点击窗体.进入窗体的代码区.2.窗体默认事件的load事件.把load事件框下拉,并找到窗体的unload事件3.在unload事件中添加代码cancel=ture.具体如下Private Sub Form_Unload(Cancel As Integer)Cancel = TrueEnd Sub4.这样就OK了,运行后你点窗体的关闭就失效了补充说明:load事件是载入事件.unload则是它的相反,你可以理解成关闭事件.cancel是取消.写在unload相当于取消这个关闭功能.

窗体的 MinButton、MaxButton 属性设为False , 或者设置 BorderStyle属性关闭按钮无效的代码:Private Declare Function GetSystemMenu Lib "user32" (ByVal hwnd As Long, ByVal bRevert As Long) As LongPrivate Declare Function

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)Cancel = TrueEnd Sub

你好!晕死,我以前做过VB编程的,不过一年多没碰了,忘记了,不要用代码的,好像是先选中窗口,再右边的属性里改.我VB都删了,郁闷,回去装一个,有问题你可以留言.如果对你有帮助,望采纳.

1、单击窗体form(使窗体处于选中状态)2、在右边的“属性”栏中设置: 1)、ControlBox = true (true代表显示关闭按钮,false代表隐藏) 扩展: 2)、MaxButton = false (false代表隐藏最大化,true代表显示) 3)、MinButton = false (flase代表隐藏最小化,true代表显示) 4)、BorderStyle = 1 - Fixed (代表不能通过拉动来改变窗体的大小)

其实很简单的.您在窗体属性里找“barderstyle”属性.把它设置为“未设置”(最上面的一个)即可.您可以试试.

把Form的属性中BorderStyle改为0-None不用语句也可以.在属性面板中选择就可以了

网站首页 | 网站地图
All rights reserved Powered by www.knrt.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com