per il primo problema io creerei una matrice di controlli (hai il tuo textbox[nell'esempio, textSerial], lo copi e lo incolli sulla stessa form :lui ti chiederà se creare una matrice di controlli e te rispondigli di si!)poi prendi il tuo seriale, ottieni un array suddividendolo x spazi
codice:
Dim arSerial() as string
arSerial=split("10 14 56 77 89 23 45 1 12 34"," ")
'poi riempi la matrice
for i=0 to ubound(arSerial)
textSerial(i+1)=arSerial(i)
next
per il secondo mi sa che devi aprire un nuovo 3d, magari specifica di che tipo di lista si tratta