资讯

精准传达 • 有效沟通

从品牌网站建设到网络营销策划,从策略到执行的一站式服务

vb.net取消窗体叉 VB如何让窗体的叉不关闭

请问VB如何使窗体上的关闭(叉叉)按钮无效,最大,最小化按钮无效化我会的。

窗体的 MinButton、MaxButton 属性设为False , 或者设置 BorderStyle属性

曲水网站建设公司创新互联建站,曲水网站设计制作,有大型网站制作公司丰富经验。已为曲水上千提供企业网站建设服务。企业网站搭建\外贸营销网站建设要多少钱,请找那个售后服务好的曲水做网站的公司定做!

关闭按钮无效的代码:

Private Declare Function GetSystemMenu Lib "user32" (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_CLOSE = HF060

Sub Disabled(ChWnd As Long) '设置窗体关闭按钮不可用的子过程

Dim hMenu, hendMenu As Long

Dim c As Long

hMenu = GetSystemMenu(ChWnd, 0)

RemoveMenu hMenu, SC_CLOSE, MF_REMOVE

End Sub

Private Sub Form_Load()

Disabled Me.hwnd '调用子过程

End Sub

VB.NET是如何关闭窗体

VB.NET关闭当前窗体me.close()

其它窗体用:窗体名.close(),例如:form2.close()

VB.NET 关闭窗体的问题

this.close() 只是关掉,没有释放,不对 me.close() 应该释放一下 me.Dispose() 给分吧、

vb .net 中右上角的那个小X,他默认是点击后关闭本窗体,如何使它关闭本程序啊?

Form_Deactivate事件在窗体被卸载时触发,在其中中加一行End结束程序就行了


本文标题:vb.net取消窗体叉 VB如何让窗体的叉不关闭
链接分享:http://cdkjz.cn/article/docdicj.html
多年建站经验

多一份参考,总有益处

联系快上网,免费获得专属《策划方案》及报价

咨询相关问题或预约面谈,可以通过以下方式与我们联系

业务热线:400-028-6601 / 大客户专线   成都:13518219792   座机:028-86922220