Adding control(arrays) at runtime

Please help me out!!!

I want to add controls at runtime.

thnx in advance
DYA

Add a CommandButton, and set the Index property to 0.

Code:

---

I = Command1.Count
Load Command1(I)
Command1(I).Move 0, 0
Command1(I).Visible = "True"

---