For i = 0 To CtlArray.Count - 1 Obj1.FromControl( CtlArray.Item(i) ) Obj1.SetProperty ("TabIndex", i ) Next