vb中如何将一个窗体的最小化最大化关闭三个按钮禁用启用
谢谢再线等!

解决方案 »

  1.   

    窗体的的属性.
    自己好好看看,
    max开头的那个.
      

  2.   

    还有MIN开头的那个,
    想要三个都没,那就改变窗体的样式.
    想要关闭按钮无效,得用API函数.
      

  3.   

    http://www.csdn.net/develop/read_article.asp?id=18774
      

  4.   

    可以将FORM中的BorderStyle属性设置为0-None,这样就没有了
      

  5.   

    把窗体的CONTROLBOX属性设置成FALSE就可以了。
      

  6.   

    简单
    把窗体的controlbox属性=false
      

  7.   

    把maxbutton.minbutton设为flase就可以了。
      

  8.   

    controlbox 设置false 来迟了
      

  9.   

    controlbox 设置false 来迟了
      

  10.   

    Private Declare Function GetSystemMenu Lib "user32" (ByVal hwnd As Long, ByVal bRevert As Long) As Long
    Private Declare Function GetMenuItemCount Lib "user32" (ByVal hMenu As Long) As Long
    Private Declare Function DrawMenuBar Lib "user32" (ByVal hwnd As Long) As Long
    Private Declare Function RemoveMenu Lib "user32" (ByVal hMenu As Long, ByVal nPosition As Long, ByVal wFlags As Long) As LongConst MF_BYPOSITION = &H400&
    Const MF_REMOVE = &H1000&Private Sub Form_Load()
        Dim hSysMenu As Long
        Dim nCnt As Long
        Me.Show
        hSysMenu = GetSystemMenu(Me.hwnd, False)
        If hSysMenu Then
        
            nCnt = GetMenuItemCount(hSysMenu)
            
            If nCnt Then
            
                RemoveMenu hSysMenu, nCnt - 1, MF_BYPOSITION Or MF_REMOVE
                
                RemoveMenu hSysMenu, nCnt - 2, MF_BYPOSITION Or MF_REMOVE
                
                RemoveMenu hSysMenu, nCnt - 3, MF_BYPOSITION Or MF_REMOVE
                RemoveMenu hSysMenu, nCnt - 4, MF_BYPOSITION Or MF_REMOVE
                RemoveMenu hSysMenu, nCnt - 5, MF_BYPOSITION Or MF_REMOVE
                DrawMenuBar Me.hwnd
            
            End If
        End If
    End Sub