Erkennen , welche Taste wurde auf einer Maus vom Benutzer gedrückt kann Ihnen mehr Informationen darüber, was Aktionen in Ihrem Visual Basic-Programm zu nehmen. In VB fast jede Kontrolle hat die " MouseClick " Ereignis, wenn die Steuerung mit der Maus geklickt wird ausgeführt . Es ist sinnvoll, die Taste gedrückt, um weitere Informationen wie Menüs oder Message-Boxen für den Benutzer zu kennen. Sie können eine beliebige VB Code, den Sie ausführen möchten, wenn eine Maustaste unter " MouseClick " event gedrückt . Things You
Microsoft Visual Basic Express
brauchen anzeigen Weitere Anweisungen
1
Starten Sie Microsoft Visual Basic Express, klicken Sie auf " Neues Projekt ... " auf der linken Seite des Bildschirms und wählen Sie dann "Windows Forms-Anwendung. " Klicken Sie auf " OK ", um eine Windows Forms-Projekt erstellen.
2
Fügen Sie ein Textfeld-Steuerelement durch Doppelklick auf " TextBox " aus der Toolbox angezeigt.
3 < p > mit der rechten Maustaste auf das Formular, und klicken Sie auf "Eigenschaften". Klicken Sie auf die "Events" -Symbol, das einen Blitzschlag ähnelt. Blättern Sie nach unten und doppelklicken Sie neben " MouseClick ", um eine Mausklick -Ereignis für das Formular erstellen. Wiederholen Sie den vorherigen Schritt, um eine Klick-Aktion -Ereignis für das Textfeld-Steuerelement hinzufügen
4
Kopieren Sie den folgenden Code in das " Form1_MouseClick "-Verfahren : .
Select Case e.Button
Fall = MouseButtons.Left
MessageBox.Show (" gedrückter linker Maustaste auf Formular . " )
Fall = MouseButtons.Right
MessageBox.Show (" gedrückter rechter Maustaste auf dem Formular . " )
Fall = MouseButtons.Middle
MessageBox.Show ( "Gedrückt mittleren Maustaste auf Formular . " )
< p> End Select
5
Kopieren Sie den folgenden Code in das " TextBox1_MouseClick "-Verfahren :
Select Case e.Button
Fall = MouseButtons.Left
MessageBox.Show (" gedrückter linker Maustaste auf Textfeld ein. " )
Fall = MouseButtons.Right
MessageBox.Show (" gedrückter rechter Maustaste auf den Text Box ").
Fall = MouseButtons.Middle
MessageBox.Show ( " Gedrückt mittleren Maustaste auf Textfeld ein. " )
End Select
< br > 6
Presse "F5 ", um Ihr Programm ausführen und nutzen Sie mit der Maustaste , während Sie die Form oder das Textfeld. Eine Meldung wird generiert , die die Maustaste gedrückt werden.