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]

C# 2017/2015/2013 Aufbau

In dieser Schulung lernen Sie fortgeschrittene Techniken im Bereich .Net C#. Dabei stehen neben den eigentlichen Techniken auch architektonische Aspekte im Mittelpunkt.

ASP.NET 2.0 und 3.5

Dieser Kurs vermittelt Ihnen alle Erweiterungen von Microsoft ASP.NET 2.0. Zu diesen zählen u. a. Data Bindung, Master Pages, und Security.

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!