VB.Net Ruft das Steuerelement ab, mit dem der Kontextmenü-Streifen angezeigt wird.

Ich hänge ein einzelnes Kontextmenü an mehrere Textfelder an. Daher muss ich den Namen / die Referenz des Steuerelements abrufen, mit dem / der das Kontextmenü angezeigt wird.

unten ist das Beispielbild meines Kontextmenüs:

Below ist der Code für das grün markierte "Einfügen" -Element-Klickereignis:

    Dim objTSMI As ToolStripMenuItem
    Dim objCMS As ContextMenuStrip
    Dim objTxtBox As System.Windows.Forms.TextBox
    objTSMI = CType(sender, ToolStripMenuItem)
    objCMS = CType(objTSMI.Owner, ContextMenuStrip)
    objTxtBox = CType(objCMS.SourceControl, System.Windows.Forms.TextBox)
    If Clipboard.ContainsText(TextDataFormat.Text) = True Then
        objTxtBox.SelectedText = Clipboard.GetText(TextDataFormat.Text)
    End If

s funktioniert sehr gu

, aber unten ist mein Code für das rot markierte Ereignis "Seitenzahl":

    Dim objTSMI As ToolStripMenuItem
    Dim objCMS As ContextMenuStrip
    Dim objTxtBox As System.Windows.Forms.TextBox
    objTSMI = CType(sender, ToolStripMenuItem)
    objCMS = CType(objTSMI.Owner, ContextMenuStrip)
    objTxtBox = CType(objCMS.SourceControl, System.Windows.Forms.TextBox)
    MessageBox.Show(objTxtBox.Name)

aber oben löst folgenden Fehler aus:

Unable to cast object of type 'System.Windows.Forms.ToolStripDropDownMenu' to type 'System.Windows.Forms.ContextMenuStrip'.

hier ist der Screenshot des Fehlers:

so, ich kann es nicht herausfinden, was das Problem ist.

jede Hilfe wäre sehr dankbar

Antworten auf die Frage(2)

Ihre Antwort auf die Frage