Render WinXP Style

[arpan_de]

I want to render the various Form controls in my app in WinXP style for which I used this code. Prior to adding the code showed in the above URL, the start-up object in my app was a Form named frmIntro. Since the code tells to use Sub Main as the start-up object, I made Sub Main as the start-up object by going to the project properties & modified Sub Main showed in the above URL as follows:

Public Sub Main()
    'Call the function before other codes
    InitCommonControlsVB
    frmIntro.Show
End Sub

But it doesn't render WinXP style in all the Forms. Only the controls in the parent Form in the app get rendered in WinXP style. Any idea what I could be missing?

I went through other posts as well in this forum regarding WinXP & all of them suggested something as shown in the above URL.