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://azwzsj.com/article/docdicj.html