正文
vb.net取消关闭 vb关闭窗口的代码
小程序:扫一扫查出行
【扫一扫了解最新限行尾号】
复制小程序
【扫一扫了解最新限行尾号】
复制小程序
VB.NET如何使最大化关闭按钮消失
this.ControlBox = false//最小化、最大化、关闭按钮全部消失
this.MinimizeBox = false//最小化按钮消失
this.MaximizeBox = false//最大化按钮消失
如果vb.net取消关闭你只想隐藏关闭按钮vb.net取消关闭的话可以参考
怎样才能用VB.NET的代码来关闭一个在运行的程序
软糖来回答罗:通过System.Diagnostics命名空间下的Process类来关闭程序的进程
Dim 进程集合 = Process.GetProcessesByName("进程名称")
For Each 进程 In 进程集合
进程.Kill()
'进程.Close() '或者使用关闭
Next
也可以先获取所有进程,再来判断这些进程的名称ProcessName
Dim 获取本地所有进程 = Process.GetProcesses()
For Each 进程 In 获取本地所有进程
If 进程.ProcessName = "explorer.exe" Then 进程.Kill()
Next
vb.net让窗口关闭时,取消关闭,隐藏窗口
问题补充:我用VB.NET写的,FORM2用来实现数据采样并显示实时曲线,关闭后再'取消FORM2的关闭 这样就把FORM2隐藏起来了,需要调出来的时候只需以下代码
vb.net中窗体中的缩小,放大,关闭可以去掉吗?
可以,属性controlBox 为false可以去掉三个按钮,另外还有maximize,minimize 可以分别控制最大化和最小化按钮的显示。
VB2008 如何取消窗体的关闭按钮
设置ControlBox为False是可以的,不过全部按钮都会消失(包括最小化,最大化)
用API可以单独把关闭按钮干掉……
'VB.NET Code
Public Class Form1
Private Declare Function GetSystemMenu Lib "User32 " (ByVal hwnd As Integer, ByVal bRevert As Long) As Integer
Private Declare Function RemoveMenu Lib "User32 " (ByVal hMenu As Integer, ByVal nPosition As Integer, ByVal wFlags As Integer) As Integer
Private Declare Function DrawMenuBar Lib "User32 " (ByVal hwnd As Integer) As Integer
Private Declare Function GetMenuItemCount Lib "User32 " (ByVal hMenu As Integer) As Integer
Private Const MF_BYPOSITION = H400
Private Const MF_DISABLED = H2
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim hMenu As Integer, nCount As Integer
hMenu = GetSystemMenu(Me.Handle.ToInt32, 0)
nCount = GetMenuItemCount(hMenu)
'Debug.Print(nCount)
Call RemoveMenu(hMenu, nCount - 1, MF_DISABLED Or MF_BYPOSITION)
DrawMenuBar(Me.Handle.ToInt32)
End Sub
End Class
'VB6 code =============================================================
Private Declare Function GetSystemMenu Lib "User32 " (ByVal hwnd As Long, ByVal bRevert As Long) As Integer
Private Declare Function RemoveMenu Lib "User32 " (ByVal hMenu As Long, ByVal nPosition As Long, ByVal wFlags As Long) As Long
Private Declare Function DrawMenuBar Lib "User32 " (ByVal hwnd As Long) As Long
Private Declare Function GetMenuItemCount Lib "User32 " (ByVal hMenu As Long) As Long
Private Const MF_BYPOSITION = H400
Private Const MF_DISABLED = H2
Private Sub Form1_Load()
Dim hMenu As Long, nCount As Long
hMenu = GetSystemMenu(Me.hWnd, 0)
nCount = GetMenuItemCount(hMenu)
'Debug.Print nCount
Call RemoveMenu(hMenu, nCount - 1, MF_DISABLED Or MF_BYPOSITION)
DrawMenuBar Me.hWnd
End Sub
VB.net 打开文件之后怎样关闭?
你都用.net了,这是vb的旧语法,不推荐使用。vb.net是面向对象的,推荐您使用
dim OpF as new io.filestream(OpenFileDialog1.FileName, IO.FileMode.Open)
...
OpF.close
或是
Using OpF as new io.filestream(OpenFileDialog1.FileName, IO.FileMode.Open)
...
End Using
但是你如果执意要用的话,也可以:
FileOpen(1, OpenFileDialog1.FileName, OpenMode.Input)
...
FileClose(1) '这里可以同时关闭多个文件号,文件号之间用,隔开
vb.net取消关闭的介绍就聊到这里吧,感谢你花时间阅读本站内容,更多关于vb关闭窗口的代码、vb.net取消关闭的信息别忘了在本站进行查找喔。