' Gambas class file arStr AS String[] PUBLIC SUB _new() i AS Integer arStr = NEW String[] '$arStr = NEW String[5] 'does NOT work! FOR i = 0 TO 4 arStr.Add(Str(i)) NEXT arStr[3] = " hello" END PUBLIC SUB Button1_Click() i AS Integer txt AS String FOR i = 0 TO 4 txt = txt & arStr[i] NEXT TextLabel1.Text = txt END
-- JochenGeorges - 28 Dec 2004