随笔-解决VB使用XP风格后无法打开问题

今天在测试程序的时候遇到一个怪问题：

开发工具：VB6、VC6

同样使用了XP风格后，使用VC6开发的MFC界面能够正常使用XP样式

但是使用VB6开发出的exe如果修饰了XP风格后，无法正常打开。

之后在群上与群友进行了讨论。原来在《老兵新传》第八章中已经有了说明。

现把简单的解决方案代码写出：

Option Explicit
Public Declare Sub InitCommonControls Lib "COMCTL32.DLL" ()


Sub Main()
    Call InitCommonControls
    Form1.Show 1
End Sub

需要注意的是，初始化控件的这个代码必须写在整个代码的第一行，不能写在Form Load事件中。