Problem:

.NET Winform Application doesn't have the Windows XP Style when run

Resolution:

Just apply the method   EnableVisualStyles to the Application's class instance  

     $set preservecase

       class-id. Main as "WinBook.Main".

       environment division.

       configuration section.

       repository.

           class class-main-form as "WinBook.Form1"

           class class-application as "System.Windows.Forms.Application"

           class class-STA-Thread as "System.STAThreadAttribute"

           .

       static.

       method-id. "Main" custom-attribute is class-STA-Thread.

       working-storage section.

       01 mainForm object reference class-main-form.

       procedure division.

           set mainForm to class-main-form::"New"()

           invoke class-application::"EnableVisualStyles"()      *> <<<<<<<!!!!!!!!!!!!!!!

           invoke class-application::"Run"(mainForm)

       end method "Main".

       end static.

       end class Main.