[vb6] assegnare comando a commandbutton creato a runtime

[Boolean]

Originariamente inviato da marguppy
ho un pulsante generato a runtime insieme ad altri oggetti
Voglio far si che quando clicco sul pulsante in questione vengano eliminati gli altri oggetti.
Come faccio ad attribuire tale comando al pulsante?

Dichiara la variabile oggetto riferita al pulsante con la clausola WithEvents nella sezione Dichiarazioni del tuo form:

Dim WithEvents cmdElimina As CommandButton

dopo potrai utilizzare tutti gli eventi che desideri, come se il pulsante fosse già presente sul form:

Private Sub cmdElimina_Click()
MsgBox "Mi hai cliccato!"
End Sub

Boolean