FIX MY RS Item Gen code plzzzz

hi,i'm a newb to programming , i tried to make a RS Item generator,for while you are logged on ,one that cteates the object ID that you put in the text box,
EG:
Blue Partyhat:1042
Yellow one:1040
and so on....
but,it no work,says:cannot create activeX component
Plz help me fix my code!??!?!???

here are the files(Form1 and codes)

:

sorry, i have no idea what your talking about

You mean creates items just visually right? It's not like you're really getting those items cause thats impossible. I did have a program once that gave me 1k blue phats, but it was just visually.