Individuare quale pulsante è stato premuto del mouse da parte dell'utente può darvi ulteriori informazioni su quali azioni intraprendere nel programma Visual Basic. In VB quasi ogni controllo dispone di un evento di "MouseClick" che viene eseguito quando il controllo viene selezionato con il mouse. È utile sapere il pulsante premuto per visualizzare ulteriori informazioni come menu o finestre di messaggio per l'utente. È possibile aggiungere qualsiasi codice di Visual Basic che si desidera eseguire quando un pulsante del mouse premuto sotto l'evento "Click del mouse".

Istruzioni

1

Avviare Microsoft Visual Basic Express, scegliere "Nuovo progetto..." nel riquadro sinistro dello schermo quindi selezionare "Applicazione Windows Form." Fare clic su "OK" per creare un progetto Windows Form.

2

Aggiungere un controllo casella di testo facendo clic su "TextBox" dal riquadro della casella degli strumenti.

3

Pulsante destro del mouse il modulo e fare clic su "Proprietà". Fare clic sull'icona di "Eventi" che assomiglia ad un colpo di fulmine. Scorrere verso il basso e fare doppio clic su accanto a "MouseClick" per creare un evento di click del mouse per il modulo. Ripetere il passaggio precedente per aggiungere un evento di azione di click per il controllo casella di testo.

4

Copiare e incollare il codice seguente all'interno della routine "Form1_MouseClick":

Select Case e.Button

Case Is = MouseButtons.Left

MessageBox.Show("Pressed left mouse button on Form.")

Case Is = MouseButtons.Right

MessageBox.Show("Pressed right mouse button on Form.")

Case Is = MouseButtons.Middle

MessageBox.Show("Pressed middle mouse button on Form.")

End Select5

Copiare e incollare il codice seguente all'interno della routine "TextBox1_MouseClick":

Selezionare il caso e.Button

Case Is = MouseButtons.Left

MessageBox.Show("Pressed left mouse button on text box.")

Case Is = MouseButtons.Right

MessageBox.Show("Pressed right mouse button on text box.")

Case Is = MouseButtons.Middle

MessageBox.Show("Pressed middle mouse button on text box.")

End Select6

Premere "F5" per eseguire il programma e utilizzare qualsiasi pulsante del mouse mentre si fa clic la forma o casella di testo. Verrà generata una finestra di messaggio che indica il pulsante del mouse premuto.