Originariamente inviato da cecco102
...vorrei che quando clicco yes si chiudesse e quando clicco no il programma rimanesse in esecuzione!
codice:
private sub cmdesci_click

   dim strmsg as string
   dim strtit as string
   dim intrisposta as integer

   strmsg="sei sicuro di volere uscire?"
   strtit="chiudi"
   intrisposta=msgbox(strmsg,vbquestion + vbyesno,strtit)
   if intrisposta=vbyes then
       end
   end if 

end sub
devi usare la funzione MsgBox() che restituisce il valore integer della risposta dell'utente.