loform = CREATEOBJECT("ArrForm") ? loForm.aForm(5) DEFINE CLASS ArrForm as Form DIMENSION aForm(5) PROCEDURE init This.aForm(5) = "Hi" ENDPROC ENDDEFINE