Wenn Sie in einer ListBox ein Popup-Menü anzeigen möchten, ist das nicht weiter schwierig. Wie funktioniert das aber in einer TextBox, die ja von Haus aus schon ein Popup-Menü hat? Wie kann man hier ein eigenes Popup-Menü realisieren? Starten Sie ein neues Projekt und fügen Sie über den Menüeditor ein Menü (Caption = Datei, Name = mnuFile) mit zwei oder mehrerenMenüpunkten (z. B. Öffnen, Speichern), eine TextBox (Text1) und eine CheckBox (Check1) in das Formular ein. Dann noch folgenden Code indas MouseDown-Ereignis der TextBox einfügen: Private Sub Text1_MouseDown(Button As Integer, _ Shift As Integer, X As Single, Y As Single) If Button = 2 Then ' 2 = rechte Maustaste Text1.Enabled = False If Check1.Value = 1 Then PopupMenu mnuFile Text1.Enabled = True Text1.SetFocus End If End Sub Starten Sie das Programm, aktivieren Sie die CheckBox und klicken Sie mit der rechten Maustaste auf die Textbox. Gar nicht so schwierig -oder? Diese Seite wurde bereits 11.325 mal aufgerufen. |
Neu! sevEingabe 3.0 Einfach stark! Ein einziges Eingabe-Control für alle benötigten Eingabetypen und -formate, inkl. Kalender-, Taschenrechner und Floskelfunktion, mehrspaltige ComboBox mit DB-Anbindung, ImageComboBox u.v.m. Buchempfehlung Tipp des Monats Mai 2024 Hermann Röttger Wochentage eines Datumsbereichs ermitteln Wochentage eines Datumsbereichs ermitteln, optional mit Feiertagsberechnung TOP Entwickler-Paket TOP-Preis!! Mit der Developer CD erhalten Sie insgesamt 24 Entwickler- komponenten und Windows-DLLs. Die Einzelkomponenten haben einen Gesamtwert von 1605.50 EUR... |
||||||||||
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein. |