请问如何屏蔽掉VB窗口中的最大化按钮

我写详细一些，记住加分
vb6.0中 让最大化、最小化按钮蒸发: 
  Private   Declare   Function   SetWindowLong   Lib   "user32"   _   
  Alias   "SetWindowLongA"   (ByVal   hwnd   As   Long,   ByVal   _   
  nIndex   As   Long,   ByVal   dwNewLong   As   Long)   As   Long   
    
  Private   Declare   Function   GetWindowLong   Lib   "user32"   _   
  Alias   "GetWindowLongA"   (ByVal   hwnd   As   Long,   ByVal   _   
  nIndex   As   Long)   As   Long   
  Const   WS_MINIMIZEBOX   =   &H20000   
  Const   WS_MAXIMIZEBOX   =   &H10000   
  Const   GWL_STYLE   =   (-16)   
  '使用:   
  Private   Sub   Form_Load()   
  Dim   lWnd   As   Long   
  lWnd   =   GetWindowLong(Me.hwnd,   GWL_STYLE)   
    
  lWnd   =   lWnd   And   Not   (WS_MINIMIZEBOX)   
  lWnd   =   lWnd   And   Not   (WS_MAXIMIZEBOX)   
  lWnd   =   SetWindowLong(Me.hwnd,   GWL_STYLE,   lWnd)   
  End   Sub

本站仅提供存储服务，所有内容均由用户发布，如发现有害或侵权内容，请点击举报。