Avviare Microsoft Visual Basic Express , fare clic sul menu "File" , e fare clic su " Nuovo progetto. " Fare clic su " Visual Basic " sotto Modelli installati e fare clic su "Applicazione Windows Form ". Fare clic su "OK".
2
doppio clic su " TextBox " dal pannello Casella degli strumenti per aggiungere un nuovo controllo casella di testo alla maschera . Fare clic con il modulo e fare clic su "Proprietà ". Fare clic sull'icona "Eventi" a forma di fulmine e scorrere verso il basso fino a trovare l'evento click del mouse.
3
doppio clic su Avanti per " MouseClick " per creare un evento MouseClick sul modulo . Digitare il seguente codice per acquisire gli eventi click del mouse :
Select Case e.Button
Case Is = Windows.Forms.MouseButtons.Left
Me.TextBox1.Text = "Sinistra pulsante del mouse cliccato . "
Case Is = Windows.Forms.MouseButtons.Middle
Me.TextBox1.Text =" pulsante sinistro del mouse cliccato . "
Case Is = di Windows . Forms.MouseButtons.Right
Me.TextBox1.Text = " tasto destro del mouse cliccato . "
End Select
la casella di testo viene aggiornata quando si fa clic con il mouse .
4
Fare clic sul menu "Debug" , e fare clic su " Avvia Debug " per eseguire il programma . Prova il tuo evento MouseClick premendo il pulsante del mouse quando il cursore si trova sul Modulo .
Programmazione © www.354353.com