viernes, 3 de abril de 2020

Eliminar botón cerrar

Protected Overrides ReadOnly Property CreateParams As CreateParams

        Get
            Const CS_NOCLOSE As Integer = 512
            Dim cp As CreateParams = MyBase.CreateParams
            cp.ClassStyle = (cp.ClassStyle Or CS_NOCLOSE)
            Return cp
        End Get
    End Property

fuente

No hay comentarios.:

Publicar un comentario