In questo articolo vedremo come interagire con i plusanti all'interno delle MsgBox.
All'interno del codice Visual Basic della Routine evento "SuClick" è necessario inseire le righe di codice che permettono oltre alla visualizzazione della MsgBox anche di eseguire codice quando si clicca uno dei pulsanti al suo interno.
Se non si specifica alcun codice, alla pressione di uno dei pulsanti, si chiude la MsgBox.
ESEMPIO 1: Clic sul pulsante Si Clic sul pulsante No
Download Project![](https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjBphzxMPWFV444FWNggmwIQAevpltS_HPs4Zwc4qVRKKNwOmU1oMBvVGo6dlvCBTctHxUq-wrw2qv-iab6sXz8nGnQ9mR4l77NN8jye__OTktfrkWcj3GHrUoikzEev4TeMEwO63g9ZR0/s200/scarica-file.jpg)
ESEMPIO 2:
Questa è una alternativa all'esempio 1: La visualizzazione viene assegnata ad una variabile iMsg di tipo Integer e quindi con l'istruzione if viene interrogata la variabile per conoscere quale dei due pulsanti è stato premuto.
Download Project![](https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjBphzxMPWFV444FWNggmwIQAevpltS_HPs4Zwc4qVRKKNwOmU1oMBvVGo6dlvCBTctHxUq-wrw2qv-iab6sXz8nGnQ9mR4l77NN8jye__OTktfrkWcj3GHrUoikzEev4TeMEwO63g9ZR0/s200/scarica-file.jpg)
ESEMPIO 3: In questo esempio viene utilizzato il Select Case per gestire i tre pulsanti all'interno della MsgBox.
Download Project![](https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjBphzxMPWFV444FWNggmwIQAevpltS_HPs4Zwc4qVRKKNwOmU1oMBvVGo6dlvCBTctHxUq-wrw2qv-iab6sXz8nGnQ9mR4l77NN8jye__OTktfrkWcj3GHrUoikzEev4TeMEwO63g9ZR0/s200/scarica-file.jpg)
Vedi anche visualizzazione MsgBox
Vedi anche personalizzazione delle MsgBox
All'interno del codice Visual Basic della Routine evento "SuClick" è necessario inseire le righe di codice che permettono oltre alla visualizzazione della MsgBox anche di eseguire codice quando si clicca uno dei pulsanti al suo interno.
Se non si specifica alcun codice, alla pressione di uno dei pulsanti, si chiude la MsgBox.
ESEMPIO 1: Clic sul pulsante Si Clic sul pulsante No
Download Project
![](https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjBphzxMPWFV444FWNggmwIQAevpltS_HPs4Zwc4qVRKKNwOmU1oMBvVGo6dlvCBTctHxUq-wrw2qv-iab6sXz8nGnQ9mR4l77NN8jye__OTktfrkWcj3GHrUoikzEev4TeMEwO63g9ZR0/s200/scarica-file.jpg)
ESEMPIO 2:
Questa è una alternativa all'esempio 1: La visualizzazione viene assegnata ad una variabile iMsg di tipo Integer e quindi con l'istruzione if viene interrogata la variabile per conoscere quale dei due pulsanti è stato premuto.
Download Project
![](https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjBphzxMPWFV444FWNggmwIQAevpltS_HPs4Zwc4qVRKKNwOmU1oMBvVGo6dlvCBTctHxUq-wrw2qv-iab6sXz8nGnQ9mR4l77NN8jye__OTktfrkWcj3GHrUoikzEev4TeMEwO63g9ZR0/s200/scarica-file.jpg)
ESEMPIO 3: In questo esempio viene utilizzato il Select Case per gestire i tre pulsanti all'interno della MsgBox.
Download Project
![](https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjBphzxMPWFV444FWNggmwIQAevpltS_HPs4Zwc4qVRKKNwOmU1oMBvVGo6dlvCBTctHxUq-wrw2qv-iab6sXz8nGnQ9mR4l77NN8jye__OTktfrkWcj3GHrUoikzEev4TeMEwO63g9ZR0/s200/scarica-file.jpg)
Vedi anche visualizzazione MsgBox
Vedi anche personalizzazione delle MsgBox
Commenti
Posta un commento