add a property to your InitClasses module, MenuIcons() As IconClass, and set its scope to either Global or Public.. Your code can start with the "redim" statement.
First, thank you for taking the time to help me. It would have never occurred to me to make this a Property. Thank you.
I did what you said. In my InitClasses module I added a Property
<Declaration> MenuIcons() <as> IconClass <=>
I left <=> blank.
I made sure that the Global GLOBE icon is selected.
I left this code in the Sub SetUpClasses
ReDim MenuIcons(24) as IconClass
Dim MN as Integer
For MN = 0 to 24
MenuIcons(MN) = New IconClass
... and I got a syntax error. Then I realized that you might mean that I should put that code into the code window below the new Property you told me to create.
So I moved it to the Property Window and RAN the app.
An OutOfBoundsException error occurred in SetUpIcons at the first appearance of: MenuIcons(0).X1 = 10
Am I still doing something wrong? As I said before, so often WHERE something goes is not obvious to me.