Visual Basic: Eventi relativi a mouse e tastiera

  • Autore: Antonio Guadagno
  • Fonte: Seneta.it

Eventi del Mouse e della tastiera

All’utilizzo del mouse e della tastiera da parte dell’utente sono correlati numerosi eventi; ciascun evento è associato a un gestore eventi per il quale è possibile creare un codice all’interno delle applicazioni Windows.

Eventi della tastiera

Windows Form include eventi di tastiera standard che consentono di rispondere alla pressione di determinati tasti e fornisce metodi per intercettare, modificare e utilizzare tali pressioni a livello di applicazione, form e controllo.

KeyPress
 Si verifica quando si preme un tasto mentre il controllo è attivo.
KeyDown
 Si verifica quando si preme un tasto mentre il controllo è attivo.
KeyUp
 Si verifica quando viene rilasciato un tasto mentre il controllo è attivo.

Ecco alcuni esempi:

    Private Sub txt_Carattere_KeyDown(sender As Object, e As KeyEventArgs) Handles txt_Carattere.KeyDown
        MsgBox("Hai premuto il tasto " & e.KeyCode.ToString)
    End Sub


    Private Sub txt_Carattere_KeyPress(sender As Object, e As KeyPressEventArgs) Handles txt_Carattere.KeyPress
        MsgBox("Hai premuto il tasto " & e.KeyChar)
    End Sub

Eventi del mouse

La ricezione e la gestione dell’input del mouse costituiscono un elemento importante di ogni applicazione Windows. E’ possibile gestire eventi del mouse per eseguire un’azione nell’applicazione oppure utilizzare le informazioni sullo stato corrente del mouse, come la posizione del puntatore, i pulsanti del mouse premuti e se la rotellina del mouse è stata fatta scorrere.

MouseClick
 Si verifica quando si fa clic con il mouse sul controllo.
MouseDoubleClick
 Si verifica quando si fa doppio clic con il mouse sul controllo.
MouseDown
 Si verifica quando il puntatore del mouse si trova sopra il controllo e viene premuto un pulsante del mouse.
MouseUp
 Si verifica quando il puntatore del mouse si trova sul controllo e un pulsante del mouse viene rilasciato.
MouseMove
 Si verifica quando il puntatore del mouse viene spostato sul controllo.
MouseEnter
 Si verifica quando il puntatore del mouse entra il controllo.
MouseLeave
 Si verifica quando il puntatore del mouse lascia il controllo.
MouseHover
 Si verifica quando il puntatore del mouse si sofferma sul controllo.
MouseWheel
 Si verifica quando si sposta la rotellina del mouse mentre il controllo ha lo stato attivo.

Ecco alcuni esempi:

 Private Sub txt_Carattere_MouseDown(sender As Object, e As MouseEventArgs) Handles txt_Carattere.MouseDown
        Select Case e.Button
            Case MouseButtons.Left
                lbl_Carattere.Text = "Pulsante Sinistro"
            Case MouseButtons.Right
                lbl_Carattere.Text = "Pulsante Destro"
            Case MouseButtons.Middle
                lbl_Carattere.Text = "Pulsante Centrale"
            Case MouseButtons.XButton1
                lbl_Carattere.Text = "Pulsante Extra 1"
            Case MouseButtons.XButton2
                lbl_Carattere.Text = "Pulsante Extra 2"
            Case MouseButtons.None
                lbl_Carattere.Text = Nothing
        End Select
    End Sub


    Private Sub txt_Carattere_MouseHover(sender As Object, e As EventArgs) Handles txt_Carattere.MouseHover
        lbl_Carattere.Text = "Esempio di utilizzo del MouseHover"
    End Sub

Visite: 3545