Visual Basic 6 - Aggiornare elementi ini una comboox

Salve, in un mio programmino carico file xml, all'avvio del progamma, in una combobox, se aggiungo altri file devo riavviare il programma per vederli caricariti nella combobox, come posso ovviare a ciò?

Private Sub Form_Load()
    Dim Files() As String, i As Long
        
    Files() = GetFiles("C:\Documents and Settings\utente\Desktop\Prodotti\*.xml*", vbNormal + vbHidden + vbSystem)
        
    For i = 1 To UBound(Files)
        Combo1.AddItem Files(i)
    Next
    
End Sub

Avevo provato a riscrivere lo stesso codice in un commandbutton per il refresh, ma oltre ad aggiungere i file nuovi mi riscrive quelli vecchi. Help me!

Prima del refresh

Combo1.clear

Come ho fatto a non pensarci! Grazie 1000