Feedback

VB - Schliessen des Forms über X-Button verhindern

Veröffentlicht von am 24.12.2006
(14 Bewertungen)
Die folgende Funktion deaktiviert den x-Button des Formulares.

Dies kann recht nützlich sein um ein unbeabsichtigtes schliessen des Formulares zu verhindern.
GFU-Schulungen  [Anzeige]

VB.NET 2017/2015/2013 Einführung

Das Seminar befähigt Sie zur eigenständigen Entwicklung von anwenderorientierten Programmen in VB.NET, worin auch der Einsatz von Datenbanken enthalten ist.

C# Komplett

Sie kennen sich in objektorientierter Programmierung aus. Sie schreiben C++ oder Java? Und nun stehen Sie vor der Aufgabe, in C# Anwendungen zu erstellen. Das C# Komplett-Seminar verschafft Ihnen umfassende Programmierkenntnisse in dieser Sprache. Nach der Schulung entwickeln Sie selbständig Anwendungen mit C#. Sie kennen die Datentypen und Klassenbibliotheken der objektorientierten Programmiersprache C#. Der Komplettkurs setzt bei den Grundlagen von C# ein. Sie arbeiten mit Variablen und konvertieren Typen. Multithreading, Delegates, Generics sind nach dem Seminar für Sie kein Geheimnis mehr.

Public Declare Function GetSystemMenu Lib "user32" (ByVal hwnd As Integer, ByVal bRevert As Integer) As Integer
Public Declare Function RemoveMenu Lib "user32" (ByVal hMenu As Integer, ByVal nPosition As Integer, ByVal wFlags As Integer) As Integer
Public Const iPOSITION = &HF060&
Public Const iFLAGS = &H0&



Function NoFormCloseButton(ByVal iHWND As Integer) As Integer
        Dim WindowSystemMenu As Integer = GetSystemMenu(iHWND, False)
        Return RemoveMenu(WindowSystemMenu, iPOSITION, iFLAGS)

End Function
 
'Auf der funktion im Activated Event des Formulares

Private Sub Form1_Activated(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Activated
        NoFormCloseButton(ActiveForm.Handle().ToInt32())

End Sub
Abgelegt unter Form, Close.

Kommentare zum Snippet

 

Logge dich ein, um hier zu kommentieren!