网创优客建站品牌官网
为成都网站建设公司企业提供高品质网站建设
热线:028-86922220
成都专业网站建设公司

定制建站费用3500元

符合中小企业对网站设计、功能常规化式的企业展示型网站建设

成都品牌网站建设

品牌网站建设费用6000元

本套餐主要针对企业品牌型网站、中高端设计、前端互动体验...

成都商城网站建设

商城网站建设费用8000元

商城网站建设因基本功能的需求不同费用上面也有很大的差别...

成都微信网站建设

手机微信网站建站3000元

手机微信网站开发、微信官网、微信商城网站...

建站知识

当前位置:首页 > 建站知识

vb.net关闭按钮无效 vb按钮消失

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

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

创新互联专业为企业提供舞钢网站建设、舞钢做网站、舞钢网站设计、舞钢网站制作等企业网站建设、网页设计与制作、舞钢企业网站模板建站服务,10年舞钢做网站经验,不只是建网站,更提供有价值的思路和整体网络服务。

关闭按钮无效的代码:

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写了一个爬虫程序,但运行起来,点击所有按钮都没有反应,非得强制关闭,listview控件也得等到

你想一边运行,一边填充数据,我给你出的主意是多线程,用另一个线程来Invoke数据,

Thread和线程Timer(不是Form中的Timer),要是同时访问一块数据注意用

SyncLock锁

如何使vb.net 中关闭按钮显示但无效

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_COLSE = HF060

Private Const SC_MAXIMIZE = HF030

Private Const SC_MINIMIZE = HF020

Private Sub Form_Load()Sub Form_Load()

RemoveMenu GetSystemMenu(Me.hWnd, 0), SC_COLSE, MF_REMOVE

RemoveMenu GetSystemMenu(Me.hWnd, 0), SC_MAXIMIZE, MF_REMOVE

RemoveMenu GetSystemMenu(Me.hWnd, 0), SC_MINIMIZE, MF_REMOVE

vb中怎么实现当点击窗体右上方的关闭按钮时,不能关闭窗体?

可以通过API函数使关闭按钮失效,也就是当窗体出现时,关闭按钮是不可用的状态。


当前文章:vb.net关闭按钮无效 vb按钮消失
新闻来源:http://bjjierui.cn/article/dosopoe.html

其他资讯