Come utilizzare un clic del mouse come l'azione in Visual Basic

February 11

Come utilizzare un clic del mouse come l'azione in Visual Basic


Individuare quale pulsante è stato premuto su un mouse da parte dell'utente può dare maggiori informazioni sulle azioni da intraprendere nel programma Visual Basic. In VB quasi ogni controllo ha l'evento "MouseClick", che viene eseguito quando il controllo viene fatto clic con il mouse. E 'utile sapere premuto il pulsante per visualizzare maggiori informazioni menu o le finestre di messaggio per l'utente. È possibile aggiungere qualsiasi codice VB si desidera eseguire quando viene premuto sotto l'evento "MouseClick" un pulsante del mouse.

istruzione

1 Avviare Microsoft Visual Basic Express, fai clic su "Nuovo progetto ..." nel riquadro a sinistra dello schermo e selezionare "Applicazione Windows Form." Fai clic su "OK" per creare un progetto Windows Form.

2 Aggiungere un testo di controllo di dialogo facendo doppio clic su "TextBox" dal riquadro Casella degli strumenti.

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

4 Copiare e incollare il seguente codice all'interno della procedura di "Form1_MouseClick":

Select Case e.Button

Case Is = MouseButtons.Left

MessageBox.Show ( "tasto sinistro del mouse premuto sul modulo.")

Case Is = MouseButtons.Right

MessageBox.Show ( "tasto destro del mouse premuto sul modulo.")

Case Is = MouseButtons.Middle

MessageBox.Show ( "pulsante centrale del mouse premuto sul modulo.")

End Select

5 Copiare e incollare il seguente codice all'interno della procedura di "TextBox1_MouseClick":

Select Case e.Button

Case Is = MouseButtons.Left

MessageBox.Show ( "tasto sinistro del mouse premuto sulla casella di testo.")

Case Is = MouseButtons.Right

MessageBox.Show ( "tasto destro del mouse premuto sulla casella di testo.")

Case Is = MouseButtons.Middle

MessageBox.Show ( "tasto centrale del mouse premuto sulla casella di testo.")

End Select

6 Premere il tasto "F5" per eseguire il programma e utilizzare un pulsante del mouse mentre si clicca il modulo o la casella di testo. Una finestra di messaggio viene generato indicando premuto il pulsante del mouse.