Intanto non è una buona idea chiamare array la variabile per il numero di elementi. Al suo posto utilizza elems
Quindi nella classe scrivi
e in BtnAggiungicodice:Dim elems As Integer Dim numeri() As Integer
codice:ReDim numeri(elems)
P.S. Comunque avevi avuto una soluzione valida anche in
http://www.visual-basic.it/Forum/tab...x#.U4yoE3J_umQ
Scrivere in tanti forum non è un buon metodo e non è visto di buon occhio ...