Wie erstellt man ein PopUp-Menü? Der Anwender soll die Möglichkeit haben, bei Klick auf die rechte Maustaste aus einem Menü etwas auswählen zu können. Ein PopUp-Menü wird über den Menü-Editor erstellt. Starten Sie ein neuesProjekt und geben Sie im Menü-Editor folgendes ein: Caption:MyPopUp
Name:mnuMyPopUp
Dieses Menü bekommt jetzt noch zwei Untermenüs: Für das erste Untermenü mit der Pfeiltaste einmal nach rechts einrücken ... Caption:Löschen Name:mnuDelete ... das zweite Untermenü auf der gleichen Ebene erstellen: Caption:Beenden Name:mnuExit Damit dieses Menü beim Start der Form nicht angezeigt wird, entfernen wirentweder noch das Häkchen in der Checkbox vor Visible oder lösen das Ganze perCode im Form_Load Ereignis: Private Sub Form_Load() mnuMyPopUp.Visible = False End Sub Der Aufruf erfolgt dann im MouseDown-Ereignis des jeweiligen Elements: ' Beispiel Form Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _ X As Single, Y As Single) If Button = 2 Then ' rechte Maustaste Me.PopupMenu mnuMyPopUp End If End Sub ' Beispiel ListBox Private Sub List1_MouseDown(Button As Integer, Shift As Integer, _ X As Single, Y As Single) If Button = 2 Then ' rechte Maustaste Me.PopupMenu mnuMyPopUp End If End Sub ' Beispiel PictureBox Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, _ X As Single, Y As Single) If Button = 2 Then ' rechte Maustaste Me.PopupMenu mnuMyPopUp End If End Sub Dies funktioniert bei allen Steuerelementen, die ein MouseDown-Ereignis habenund bei denen von Haus aus kein PopUp-Menü vorhanden ist. Diese Seite wurde bereits 24.503 mal aufgerufen. |
vb@rchiv CD Vol.6 Geballtes Wissen aus mehr als 8 Jahren vb@rchiv! Online-Update-Funktion Entwickler-Vollversionen u.v.m. Buchempfehlung Tipp des Monats April 2024 Skyfloy Chart von Microsoft und dazu noch gratis Tutorial für Microsoft Chart Controls für Microsoft .NET Framework 3.5 Neu! sevCoolbar 3.0 Professionelle Toolbars im modernen Design! Mit sevCoolbar erstellen Sie in wenigen Minuten ansprechende und moderne Toolbars und passen diese optimal an das Layout Ihrer Anwendung an (inkl. große Symbolbibliothek) - für VB und MS-Access |
||||||||||
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. |