Hi: I think this code should work. However I get a segfault each time I try to execute it: PUBLIC SUB Button1_Click() DIM hClass AS Class DIM aString AS String hClass = Classes["Button"] FOR EACH aString IN hClass.Symbols PRINT aString NEXT END (With Gambas-2 1.9.21) Regards, D. Campos