Un esempio ...

Nel form inserisci un pulsante (Command1) con indice 0 e Visible a False

Nel codice di prova, scrivi

codice:
Private Sub Command1_Click(Index As Integer)
    Print "Tasto pressato: " & Index
End Sub

Private Sub Form_Click()
    Static ix As Integer
    
    ix = ix + 1
    Load Command1(ix)
    Command1(ix).Visible = True
    Command1(ix).Top = Command1(ix).Top + 1000 * ix
End Sub
Quando farai click sul form, verra' creato un nuovo pulsante ... se clicchi sui pulsanti creati, il loro indice viene visualizzato ...

P.S. ... SP4 e' vecchiotto ... applica il SP6 per il VB6 ...