VB.net怎么隐藏那个叉叉?就是最大化旁边的

来源:百度知道 编辑:UC知道 时间:2024/07/07 23:59:41
高手请帮下忙……50分

方法1.将FormBorderStyle的值设为None
方法2.或将ControlBox的值设为false

方法3.如查你仅仅是要将关闭按钮disable的话,请双击窗体,后将以下代码替换窗体中的所有代码。

Public Class Form1

Private Declare Function GetSystemMenu Lib "user32" (ByVal hWnd As Integer, ByVal bRevert As Integer) As Integer
Private Declare Function RemoveMenu Lib "user32" (ByVal hMenu As Integer, ByVal nPosition As Integer, ByVal wFlags As Integer) As Integer
Private Const MF_REMOVE = &H1000&
Private Const SC_COLSE = &HF060
Private Const SC_MAXIMIZE = &HF030
Private Const SC_MINIMIZE = &HF020

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

RemoveMenu(GetSystemMenu(Me.Handle, 0), SC_COLSE, MF_REMOVE) '//关闭
RemoveMenu(GetSystemMenu(Me.Handle, 0), SC_MAXIMIZE, MF_REMOVE) '//最大化
RemoveMenu(GetSystemMenu(Me.Handle, 0), SC_MINIMIZE, MF_REMOVE) ’//最小化

End Sub

End Cl