Wenn es um Veranstaltungen Mausklick in Visual Basic, ein Großteil der Arbeit der Umgang mit ihnen bereits für Sie erledigt kommt . Die meisten Steuerelemente in Visual Basic die "Click ", " MouseDown " und " MouseUp " Ereignisse, die Sie verwenden, um das Programm zu steuern kann , wenn der Benutzer mit der Maus klickt . Auch können Sie die " MouseEventArgs " class Eigenschaften , um zusätzliche Daten für diese Ereignisse , z. B. welche Maustaste der Anwender gedrückt oder die Koordinaten der Maus auf dem Formular. Bieten Nachdem Sie ein neues Visual Basic-Projekt erstellen , können Sie per Mausklick Ereignisse auf verschiedene Arten machen . Anleitung
Click Event
1
Doppelklicken Sie auf den "Button" -Steuerelement in der Toolbox auf " Button1 " zum Formular hinzufügen .
2
Doppelklick auf " Button1 Button1 ", um das Fenster" " . Codefenster
3
Geben Sie den folgenden :
MsgBox (" Du hast den Button geklickt " , MsgBoxStyle.Information " Button " )
klickt der Nutzer auf Button1 , eine Informations- Box mit den Meldung angezeigt . Ersetzen Sie diese mit mehr praktische Code , wie ein Aufruf einer anderen Funktion , Wertewandel in Etiketten oder Textfelder oder Aufforderung des Benutzers für weitere Informationen.
Maus Down und Up
4
Doppelklicken Sie auf das "Label"- Steuerelement in der Toolbox auf " Label1 " zum Formular hinzufügen . Ändern Sie den Text -Eigenschaft auf " Sie haben auf dem Etikett nicht geklickt . " Öffnen Sie das Codefenster
5
Öffnen Sie die " Label1_MouseDown "-Funktion und geben Sie die folgenden Schritte aus: .
Label1.Text = " . Sie befinden sich aktuell auf das Label "
< p> das Etikett zeigt diese Meldung , wenn der Benutzer klickt auf dem Etikett
6
Öffnen Sie die " Label1_MouseUp "-Funktion und geben Sie die folgenden Schritte aus: .
Label1.Text = "Sie haben aufgehört . Klicken auf die Bezeichnung "
das Etikett zeigt diese Meldung , wenn der Benutzer die Maustaste loslässt
7
öffnen . " Label1_MouseLeave "-Funktion und geben Sie den folgenden :
< p> Wenn Label1.Text = "Sie haben aufgehört, auf das Label . " Dann
Label1.Text = "Sie haben geklickt auf dem Etikett . "
End If
Das Etikett zeigt diese Meldung, wenn der Benutzer bereits auf dem Etikett geklickt und dann die Maustaste losgelassen , bewegt dann den Mauszeiger aus dem Etikett selbst .
MouseEventArgs Klasse
8
Doppelklicken Sie auf das "Label"- Steuerelement in der Toolbox sechsmal fügen Sie sechs Etiketten zum Formular , mit dem Namen " Label1 " bis " Label6 . "
9
Ordnen Sie die Etiketten vertikal auf der Form , so dass Label1 ist an der Spitze und Label6 ist an der Unterseite.
10
Öffnen Sie die " Form1_MouseClick "-Funktion und geben Sie den folgenden :
Label1.Text = " Button:" & e.Button.ToString
Label2.Text = "Clicks : "& e.Clicks
Label3.Text =" X-Position : "& eX
Label4.Text =" Y-Position : "& eY
Label5.Text = "Location:" & e.Location.ToString
Label6.Text = " Delta :" & e.Delta
klickt der Benutzer auf dem Formular , die jeweils MouseEventArgs Immobilie in einer der angezeigt wird die sechs Etiketten. Dies zeigt, welche Schaltfläche der Benutzer geklickt hat , wie oft er angeklickt wird, die x-Koordinate , die x-Koordinate , die xy - Koordinaten zusammen und das Delta -Wert, der , wie oft das Mausrad dreht zählt . Konvertieren Sie die Schaltfläche Eigenschaften und Lage in Strings kann der Benutzer die Werte deutlich sehen .