(急!!!)VB中如何让窗口的默认关闭按钮显示，但是不可用?

(急!!!)VB中如何让窗口的默认关闭、最小化、最大化按钮显示，但是不可用，就像把command的enabled设成false一样

maxbutton 和 minbutton 可以直接设置为（好象不可以同时设置）False
至于关闭按扭：
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

Function Disabled(ChWnd As Long)
Dim hMenu, hendMenu As Long
Dim c As Long
hMenu = GetSystemMenu(ChWnd, 0)
RemoveMenu hMenu, SC_CLOSE, MF_REMOVE
End Function

'然后在Sub Form_Load()中加入Disabled Me.hwnd即可：
Private Sub Form_Load()
Disabled Me.hwnd
End Sub

温馨提示：内容为网友见解，仅供参考

当前网址：https://11.t2y.org/zz/fsfs8sp8.html