Visual # *** per cancellare il controllo da un form
Private Sub cmddelete_click() If maxid <= 1 Then Exit Sub ' conserva i primi due pulsanti. unload optbutton(maxid) ' elimina l'ultimo pulsante. maxid = maxid - 1 ' riduce il conteggio dei pulsanti. optbutton(0).setfocus ' reimposta la selezione dei pulsanti. End Sub |