Schließt in VB.NET 2003 bei Shortcut auch das MDI-Formular mit If Not Me.ActiveMdiChild Is Nothing Then Me.ActiveMdiChild.Close()?

Question

Schließt in VB.NET 2003 bei Shortcut auch das MDI-Formular mit If Not Me.ActiveMdiChild Is Nothing Then Me.ActiveMdiChild.Close()?

Antwort

Verwandte Fragen

Warum schließt in VB.NET 2003 das Strg+W-Shortcut nicht nur das MDI-Child, sondern auch die MDI-Form selbst?

Wie greife ich in VB.NET 2003 von einem MDI-Formular auf ein Steuerelement zu?

Wie kann man in VB.NET 2003 von einem Child-Formular aus einen Wert aus der MDI-Form abfragen?

Wie kann ich in VB.NET 2003 einen Screenshot eines Child-Forms als BackgroundImage im MDI-Parent anzeigen?

Kann eine Anwendung in VB.NET 2003 mehr als ein MDI-Formular besitzen?

Wie greift man in VB.NET 2003 aus einer Child-Form auf den MDI-Container zu?

Wie kann ich mit VB.NET 2003 eine Liste aller Sektionen aus einer INI-Datei auslesen?

Wie erhalte ich in VB.NET 2003 eine Rückmeldung, wenn das Verschieben einer Datei in den Papierkorb abgebrochen wird?

Wie kann ich in VB.NET 2003 den Papierkorb verwenden?

Warum funktioniert 'TextBox1.ContextMenu = Nothing' in VB.NET 2003 nicht?

Accepted Answer

Ja, der von dir genannte Code in VB.NET 2003: ```vb If Not Me.ActiveMdiChild Is Nothing Then Me.ActiveMdiChild.Close() End If ``` schließt das aktuell aktive MDI-Kindformular (also das untergeordnete Formular innerhalb des MDI-Parent-Formulars), **nicht** das MDI-Parent-Formular selbst. Das bedeutet: - Wenn ein Shortcut (z.B. Strg+W) diesen Code ausführt, wird nur das aktive Kindformular geschlossen, sofern eines geöffnet ist. - Das Hauptformular (MDI-Parent) bleibt weiterhin geöffnet. Das MDI-Parent-Formular selbst wird nur geschlossen, wenn du explizit `Me.Close()` im MDI-Parent-Formular aufrufst.

Accepted Answer

Das von dir beschriebene Verhalten tritt häufig auf, wenn das Shortcut (z. B. Strg+W) sowohl im Child-Formular als auch im MDI-Parent-Formular verarbeitet wird oder das Shortcut im MainMenu nicht... [mehr]

Accepted Answer

Das von dir beschriebene Verhalten tritt häufig auf, wenn das Shortcut (z. B. Strg+W) sowohl im Child-Formular als auch im MDI-Parent-Formular verarbeitet wird oder das Shortcut im MainMenu nicht korrekt auf das aktive Child-Formular beschränkt ist. **Mögliche Ursache:** In VB.NET 2003 (Windows Forms) wird das MainMenu-Shortcut standardmäßig auch dann ausgelöst, wenn das MDI-Parent-Formular den Fokus hat. Wenn du Strg+W als Shortcut für „Schließen“ im MainMenu des MDI-Parents definierst, wird dieses Ereignis auch dann ausgelöst, wenn kein Child-Formular aktiv ist – und dann schließt du möglicherweise das MDI-Parent-Formular selbst. **Lösungsvorschlag:** Im Event-Handler für das Schließen-Menü solltest du prüfen, ob ein MDI-Child aktiv ist, und nur dieses schließen. Das MDI-Parent-Formular sollte nicht geschlossen werden. **Beispiel:** ```vb.net Private Sub mnuClose_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuClose.Click If Not Me.ActiveMdiChild Is Nothing Then Me.ActiveMdiChild.Close() End If End Sub ``` Hierbei ist `mnuClose` das Menüelement mit dem Shortcut Strg+W. **Zusätzlicher Hinweis:** Falls du im Child-Form einen eigenen Button zum Schließen hast, sollte dieser einfach `Me.Close()` aufrufen. Das ist korrekt. **Zusammenfassung:** - Das Shortcut im MainMenu sollte nur das aktive Child schließen, nicht das MDI-Parent. - Überprüfe im Event-Handler, ob ein aktives Child existiert. - So verhinderst du, dass das MDI-Parent-Formular durch Strg+W geschlossen wird. **Weitere Infos:** - [MDI-Formulare in Windows Forms](https://learn.microsoft.com/de-de/dotnet/desktop/winforms/advanced/multiple-document-interface-mdi-applications?view=netframeworkdesktop-4.8) - [MainMenu.Shortcut Eigenschaft](https://learn.microsoft.com/de-de/dotnet/api/system.windows.forms.menuitem.shortcut?view=netframework-4.8) Falls du noch ein konkretes Codebeispiel hast, kann die Ursache noch genauer eingegrenzt werden.

Accepted Answer

Um in Visual Basic .NET 2003 (VB.NET 2003) innerhalb einer MDI-Anwendung (Multiple Document Interface) von einem MDI-Parent-Formular (Hauptfenster) auf ein Steuerelement (z. B. einen Button, also &bdq... [mehr]

Accepted Answer

Um in Visual Basic .NET 2003 (VB.NET 2003) innerhalb einer MDI-Anwendung (Multiple Document Interface) von einem MDI-Parent-Formular (Hauptfenster) auf ein Steuerelement (z. B. einen Button, also „Schaltzug“) eines MDI-Child-Formulars (Unterfenster) zuzugreifen, gehst du wie folgt vor: **Beispiel: Zugriff vom MDI-Parent auf einen Button im aktiven MDI-Child** Angenommen, das MDI-Child-Formular heißt `ChildForm` und enthält einen Button namens `Button1`. 1. **Typprüfung und Zugriff:** ```vb ' Im MDI-Parent-Formular: Dim aktivesChild As Form = Me.ActiveMdiChild If aktivesChild IsNot Nothing AndAlso TypeOf aktivesChild Is ChildForm Then Dim child As ChildForm = CType(aktivesChild, ChildForm) child.Button1.Text = "Neuer Text" ' Oder andere Eigenschaften/Methoden End If ``` 2. **Zugriff auf ein bestimmtes MDI-Child:** ```vb For Each f As Form In Me.MdiChildren If TypeOf f Is ChildForm Then Dim child As ChildForm = CType(f, ChildForm) child.Button1.Enabled = False End If Next ``` **Wichtige Hinweise:** - Das Steuerelement (z. B. `Button1`) muss im `ChildForm` als `Public` oder mindestens `Friend` deklariert sein, damit du von außen darauf zugreifen kannst. - Beispiel für die Deklaration im Child-Formular: ```vb Public WithEvents Button1 As System.Windows.Forms.Button ``` **Zusammenfassung:** Du greifst über die `MdiChildren`-Eigenschaft oder `ActiveMdiChild` auf das gewünschte Child-Form zu, prüfst den Typ und kannst dann auf die Steuerelemente zugreifen, sofern sie entsprechend deklariert sind. Weitere Infos zu MDI in VB.NET findest du z. B. bei [Microsoft Learn](https://learn.microsoft.com/de-de/dotnet/desktop/winforms/advanced/multiple-document-interface-mdi-applications?view=netframeworkdesktop-4.8).

Accepted Answer

Um in VB.NET 2003 von einem MDI-Child-Formular auf einen Wert der MDI-Parent-Form zuzugreifen, gehst du wie folgt vor: 1. **Typisieren des Parent-Formulars:** Das MDI-Parent-Formular muss eine &... [mehr]

Accepted Answer

Um in VB.NET 2003 von einem MDI-Child-Formular auf einen Wert der MDI-Parent-Form zuzugreifen, gehst du wie folgt vor: 1. **Typisieren des Parent-Formulars:** Das MDI-Parent-Formular muss eine öffentliche Eigenschaft oder Methode bereitstellen, auf die das Child-Formular zugreifen kann. 2. **Zugriff vom Child-Formular:** Im Child-Formular kannst du über die `Me.MdiParent`-Eigenschaft auf das Parent-Formular zugreifen. Da `MdiParent` vom Typ `Form` ist, musst du es auf den tatsächlichen Typ deines MDI-Parent-Formulars casten. **Beispiel:** Angenommen, dein MDI-Parent-Formular heißt `MainForm` und hat eine öffentliche Eigenschaft: ```vb.net ' Im MDI-Parent (MainForm) Public Property MeinWert As String ``` Im Child-Formular kannst du dann so darauf zugreifen: ```vb.net ' Im MDI-Child Dim parent As MainForm = CType(Me.MdiParent, MainForm) Dim wert As String = parent.MeinWert ``` **Wichtige Hinweise:** - Stelle sicher, dass die Eigenschaft oder Methode im Parent-Formular `Public` ist. - Prüfe ggf. mit `If Not Me.MdiParent Is Nothing Then ...`, ob das Parent-Formular gesetzt ist, bevor du darauf zugreifst. **Zusammengefasst:** Im Child-Formular: ```vb.net Dim parent As MainForm = CType(Me.MdiParent, MainForm) Dim wert As String = parent.MeinWert ``` So kannst du Werte oder Methoden des MDI-Parent-Formulars aus dem Child-Formular heraus nutzen.

Accepted Answer

Um in VB.NET 2003 einen Screenshot eines MDI-Child-Forms zu erstellen und diesen als `BackgroundImage` im MDI-Parent zu verwenden, kannst du wie folgt vorgehen: 1. **Screenshot des Child-Forms erstel... [mehr]

Accepted Answer

Um in VB.NET 2003 einen Screenshot eines MDI-Child-Forms zu erstellen und diesen als `BackgroundImage` im MDI-Parent zu verwenden, kannst du wie folgt vorgehen: 1. **Screenshot des Child-Forms erstellen:** Du kannst das Child-Form in ein Bitmap zeichnen lassen, indem du die `DrawToBitmap`-Methode verwendest. In .NET 1.1 (VB.NET 2003) gibt es diese Methode allerdings noch nicht direkt, daher musst du das Child-Form mit `BitBlt` aus der WinAPI abgreifen. 2. **Bitmap als BackgroundImage setzen:** Das erzeugte Bitmap kannst du dann dem `BackgroundImage`-Eigenschaft des MDI-Parents zuweisen. Hier ein Beispiel, wie du das machen kannst: ```vbnet ' API-Deklarationen Private Declare Auto Function BitBlt Lib "gdi32.dll" ( _ ByVal hdcDest As IntPtr, ByVal nXDest As Integer, ByVal nYDest As Integer, _ ByVal nWidth As Integer, ByVal nHeight As Integer, _ ByVal hdcSrc As IntPtr, ByVal nXSrc As Integer, ByVal nYSrc As Integer, _ ByVal dwRop As Integer) As Boolean Private Const SRCCOPY As Integer = &HCC0020 ' Screenshot-Funktion Public Function GetFormScreenshot(frm As Form) As Bitmap Dim bmp As New Bitmap(frm.Width, frm.Height) Dim g As Graphics = Graphics.FromImage(bmp) Dim hdcDest As IntPtr = g.GetHdc() Dim hdcSrc As IntPtr = frm.CreateGraphics().GetHdc() BitBlt(hdcDest, 0, 0, frm.Width, frm.Height, hdcSrc, 0, 0, SRCCOPY) g.ReleaseHdc(hdcDest) frm.CreateGraphics().ReleaseHdc(hdcSrc) g.Dispose() Return bmp End Function ``` **Anwendung:** Angenommen, dein MDI-Child heißt `childForm` und dein MDI-Parent ist `Me`: ```vbnet ' Child unsichtbar machen childForm.Visible = False ' Screenshot erstellen Dim bmp As Bitmap = GetFormScreenshot(childForm) ' Als BackgroundImage setzen Me.BackgroundImage = bmp ``` **Hinweise:** - Das Child-Form muss sichtbar gewesen sein, damit der Screenshot korrekt ist. - Die Methode funktioniert nur mit klassischen Windows-Forms-Steuerelementen. - In .NET 1.1 gibt es keine direkte Möglichkeit, ein Steuerelement in ein Bitmap zu rendern, daher ist der Weg über die WinAPI notwendig. **Weitere Infos:** - [BitBlt-Funktion (Microsoft Doku)](https://learn.microsoft.com/en-us/windows/win32/api/wingdi/nf-wingdi-bitblt) - [MDI-Formulare in VB.NET (Microsoft Doku)](https://learn.microsoft.com/de-de/dotnet/desktop/winforms/advanced/multiple-document-interface-mdi-applications?view=netframeworkdesktop-4.8) Falls du weitere Details zu WinAPI oder zu MDI in .NET 1.1 brauchst, findest du in der Microsoft-Dokumentation hilfreiche Beispiele.

Accepted Answer

In VB.NET 2003 kann eine Anwendung grundsätzlich mehrere MDI-Formulare (also mehrere Formulare, die jeweils als MDI-Container fungieren) besitzen. Allerdings kann **immer nur ein MDI-Container ak... [mehr]

Accepted Answer

In VB.NET 2003 kann eine Anwendung grundsätzlich mehrere MDI-Formulare (also mehrere Formulare, die jeweils als MDI-Container fungieren) besitzen. Allerdings kann **immer nur ein MDI-Container aktiv sein**, d.h. ein Kindformular kann immer nur zu einem MDI-Container gehören. Du kannst also mehrere MDI-Formulare (z.B. `MDIForm1`, `MDIForm2`) in deinem Projekt anlegen und jeweils als `IsMdiContainer = True` setzen. Beim Start deiner Anwendung entscheidest du, welches MDI-Formular angezeigt wird. Es ist aber **nicht möglich**, dass ein Kindformular gleichzeitig in mehreren MDI-Containern angezeigt wird. Zusammengefasst: - **Mehrere MDI-Formulare im Projekt:** Ja, das ist möglich. - **Mehrere MDI-Formulare gleichzeitig geöffnet:** Ja, das ist möglich. - **Ein Kindformular in mehreren MDI-Containern gleichzeitig:** Nein, das ist nicht möglich. Weitere Infos findest du z.B. in der offiziellen Microsoft-Dokumentation zu [MDI-Formularen](https://learn.microsoft.com/de-de/dotnet/desktop/winforms/advanced/multiple-document-interface-mdi-applications?view=netframeworkdesktop-4.8).

Accepted Answer

In VB.NET 2003 kannst du aus einer Child-Form (MDI-Child) auf den MDI-Container (das MDI-Parent-Formular) über die Eigenschaft `Me.MdiParent` zugreifen. Diese Eigenschaft liefert eine Referenz au... [mehr]

Accepted Answer

In VB.NET 2003 kannst du aus einer Child-Form (MDI-Child) auf den MDI-Container (das MDI-Parent-Formular) über die Eigenschaft `Me.MdiParent` zugreifen. Diese Eigenschaft liefert eine Referenz auf das übergeordnete MDI-Formular. Beispiel: ```vb.net ' Innerhalb der Child-Form: Dim parentForm As Form = Me.MdiParent ' Wenn du auf eine bestimmte Eigenschaft oder Methode des MDI-Containers zugreifen möchtest, ' kannst du das MDI-Parent-Formular ggf. in den richtigen Typ umwandeln: Dim mainForm As MainForm = CType(Me.MdiParent, MainForm) mainForm.SomePublicMethod() ``` **Hinweise:** - Ersetze `MainForm` durch den tatsächlichen Namen deines MDI-Parent-Formulars. - Die Methode oder Eigenschaft, auf die du zugreifen möchtest, muss im MDI-Parent als `Public` deklariert sein. **Weitere Infos:** - [Microsoft Docs: Form.MdiParent Property](https://learn.microsoft.com/en-us/dotnet/api/system.windows.forms.form.mdiparent) So kannst du aus einer Child-Form heraus auf den MDI-Container zugreifen.

Accepted Answer

Um mit VB.NET 2003 eine Liste aller Sektionen (Sections) einer INI-Datei zu erhalten, kannst du die Windows-API-Funktion `GetPrivateProfileSectionNames` verwenden. Diese Funktion liest alle Sektionsna... [mehr]

Accepted Answer

Um mit VB.NET 2003 eine Liste aller Sektionen (Sections) einer INI-Datei zu erhalten, kannst du die Windows-API-Funktion `GetPrivateProfileSectionNames` verwenden. Diese Funktion liest alle Sektionsnamen aus einer INI-Datei in einen Puffer ein. Hier ein Beispiel, wie das geht: ```vb.net Imports System.Runtime.InteropServices Imports System.Text Public Class IniReader <DllImport("kernel32.dll", CharSet:=CharSet.Auto)> Private Shared Function GetPrivateProfileSectionNames( ByVal lpszReturnBuffer As StringBuilder, ByVal nSize As Integer, ByVal lpFileName As String) As Integer End Function Public Shared Function GetSections(ByVal iniPath As String) As List(Of String) Dim maxBuffer As Integer = 32767 Dim buffer As New StringBuilder(maxBuffer) GetPrivateProfileSectionNames(buffer, maxBuffer, iniPath) Dim sections() As String = buffer.ToString().Split(Chr(0)) Dim result As New List(Of String) For Each section As String In sections If section.Length > 0 Then result.Add(section) End If Next Return result End Function End Class ``` **Verwendung:** ```vb.net Dim sections As List(Of String) = IniReader.GetSections("C:\Pfad\zur\deiner.ini") For Each section As String In sections Console.WriteLine(section) Next ``` **Hinweise:** - Der Pfad zur INI-Datei muss korrekt angegeben werden. - Die Funktion gibt eine Liste aller Sektionsnamen zurück. - Diese Lösung funktioniert unter Windows, da sie auf die Windows-API zugreift. Weitere Informationen zur API findest du z.B. in der [Microsoft-Dokumentation](https://learn.microsoft.com/en-us/windows/win32/api/winbase/nf-winbase-getprivateprofilesectionnames).

Accepted Answer

In VB.NET 2003 gibt es keine eingebaute, direkte Möglichkeit, den Abbruch (z.B. durch den Benutzer) beim Verschieben einer Datei in den Papierkorb zu erkennen, da die Standardmethoden wie `File.D... [mehr]

Accepted Answer

In VB.NET 2003 gibt es keine eingebaute, direkte Möglichkeit, den Abbruch (z.B. durch den Benutzer) beim Verschieben einer Datei in den Papierkorb zu erkennen, da die Standardmethoden wie `File.Delete` die Datei sofort löschen und keine Interaktion mit dem Papierkorb bieten. Um eine Datei in den Papierkorb zu verschieben und Rückmeldungen über einen Abbruch zu erhalten, musst du die Windows-API-Funktion `SHFileOperation` verwenden. Diese Funktion kann Rückgabewerte liefern, die anzeigen, ob die Operation erfolgreich war, abgebrochen wurde oder ein Fehler aufgetreten ist. Hier ein Beispiel, wie du das in VB.NET 2003 umsetzen kannst: ```vbnet Imports System.Runtime.InteropServices Public Class Form1 <StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Auto)> Private Structure SHFILEOPSTRUCT Public hwnd As IntPtr Public wFunc As Integer Public pFrom As String Public pTo As String Public fFlags As Short Public fAnyOperationsAborted As Boolean Public hNameMappings As IntPtr Public lpszProgressTitle As String End Structure <DllImport("shell32.dll", CharSet:=CharSet.Auto)> Private Shared Function SHFileOperation(ByRef lpFileOp As SHFILEOPSTRUCT) As Integer End Function Private Const FO_DELETE As Integer = &H3 Private Const FOF_ALLOWUNDO As Short = &H40 Private Const FOF_NOCONFIRMATION As Short = &H10 Public Function MoveFileToRecycleBin(ByVal filePath As String) As Boolean Dim shf As New SHFILEOPSTRUCT shf.wFunc = FO_DELETE shf.pFrom = filePath & vbNullChar & vbNullChar shf.fFlags = FOF_ALLOWUNDO Dim result As Integer = SHFileOperation(shf) If shf.fAnyOperationsAborted Then ' Abbruch durch den Benutzer Return False ElseIf result <> 0 Then ' Fehler beim Verschieben Throw New System.ComponentModel.Win32Exception(result) Else ' Erfolgreich verschoben Return True End If End Function End Class ``` **Wichtige Hinweise:** - Die Funktion gibt `False` zurück, wenn der Benutzer den Vorgang abbricht (`fAnyOperationsAborted = True`). - Bei Fehlern wird eine Exception ausgelöst. - Bei Erfolg gibt die Funktion `True` zurück. **Weitere Informationen:** - [Microsoft Doku zu SHFileOperation](https://learn.microsoft.com/en-us/windows/win32/api/shellapi/nf-shellapi-shfileoperationa) Mit dieser Methode kannst du also erkennen, ob der Benutzer den Vorgang abgebrochen hat.

Accepted Answer

In VB.NET 2003 gibt es keine eingebaute .NET-Klassenbibliothek, um Dateien direkt in den Windows-Papierkorb zu verschieben. Du kannst jedoch die Windows-API-Funktion **SHFileOperation** aus der Shell3... [mehr]

Accepted Answer

In VB.NET 2003 gibt es keine eingebaute .NET-Klassenbibliothek, um Dateien direkt in den Windows-Papierkorb zu verschieben. Du kannst jedoch die Windows-API-Funktion **SHFileOperation** aus der Shell32.dll verwenden, um Dateien oder Ordner in den Papierkorb zu verschieben. Hier ein Beispiel, wie du das machen kannst: 1. **Deklariere die benötigten Strukturen und Funktionen:** ```vb.net Imports System.Runtime.InteropServices Public Class Papierkorb <StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Auto)> Private Structure SHFILEOPSTRUCT Public hwnd As IntPtr Public wFunc As Integer <MarshalAs(UnmanagedType.LPTStr)> Public pFrom As String <MarshalAs(UnmanagedType.LPTStr)> Public pTo As String Public fFlags As Short Public fAnyOperationsAborted As Boolean Public hNameMappings As IntPtr <MarshalAs(UnmanagedType.LPTStr)> Public lpszProgressTitle As String End Structure <DllImport("shell32.dll", CharSet:=CharSet.Auto)> Private Shared Function SHFileOperation(ByRef lpFileOp As SHFILEOPSTRUCT) As Integer End Function Private Const FO_DELETE As Integer = &H3 Private Const FOF_ALLOWUNDO As Short = &H40 Private Const FOF_NOCONFIRMATION As Short = &H10 ' Methode zum Verschieben in den Papierkorb Public Shared Function InPapierkorbVerschieben(ByVal dateipfad As String) As Boolean Dim shf As New SHFILEOPSTRUCT() shf.wFunc = FO_DELETE shf.pFrom = dateipfad & vbNullChar & vbNullChar shf.fFlags = FOF_ALLOWUNDO Or FOF_NOCONFIRMATION Dim result As Integer = SHFileOperation(shf) Return (result = 0) End Function End Class ``` 2. **Verwendung:** ```vb.net Dim erfolg As Boolean = Papierkorb.InPapierkorbVerschieben("C:\Pfad\zur\Datei.txt") If erfolg Then MessageBox.Show("Datei wurde in den Papierkorb verschoben.") Else MessageBox.Show("Fehler beim Verschieben in den Papierkorb.") End If ``` **Hinweise:** - Der Pfad muss vollständig sein. - Für mehrere Dateien kannst du die Pfade mit einem Null-Zeichen (`vbNullChar`) trennen. - Diese Methode funktioniert unter Windows-Betriebssystemen. **Weitere Informationen:** - [Microsoft Doku zu SHFileOperation](https://learn.microsoft.com/en-us/windows/win32/api/shellapi/nf-shellapi-shfileoperationa) Mit dieser Methode kannst du in VB.NET 2003 Dateien und Ordner in den Papierkorb verschieben.

Accepted Answer

In VB.NET 2003 (also .NET Framework 1.1) gibt es die Eigenschaft `ContextMenu` für Steuerelemente wie `TextBox`. Allerdings akzeptiert diese Eigenschaft **kein `Nothing`** (bzw. `null`), um das K... [mehr]

Accepted Answer

In VB.NET 2003 (also .NET Framework 1.1) gibt es die Eigenschaft `ContextMenu` für Steuerelemente wie `TextBox`. Allerdings akzeptiert diese Eigenschaft **kein `Nothing`** (bzw. `null`), um das Kontextmenü zu deaktivieren. Stattdessen erwartet sie ein Objekt vom Typ `ContextMenu`. Wenn du versuchst, `TextBox1.ContextMenu = Nothing` zu setzen, passiert entweder nichts oder es wird ein Fehler ausgelöst, weil das Steuerelement weiterhin das Standard-Kontextmenü anzeigt. **Lösung:** Um das Kontextmenü zu deaktivieren, musst du eine **leere Instanz** eines `ContextMenu` zuweisen: ```vb TextBox1.ContextMenu = New ContextMenu() ``` Dadurch wird das Standard-Kontextmenü durch ein leeres ersetzt, und beim Rechtsklick erscheint kein Menü mehr. **Hinweis:** Ab .NET 2.0 gibt es die Eigenschaft `ContextMenuStrip` und das Verhalten ist etwas anders. In .NET 1.1 (VB.NET 2003) funktioniert aber nur der oben beschriebene Weg. **Weitere Infos:** - [Microsoft Docs: TextBox.ContextMenu Property (.NET 1.1)](https://learn.microsoft.com/en-us/dotnet/api/system.windows.forms.textbox.contextmenu?view=netframework-1.1)