Private Declare Sub InitCommonControls Lib "comctl32.dll" ()
Dim comprobacion As String
Option Explicit

Private Sub Form_Initialize()
InitCommonControls
End Sub

<?xml version="1.0" standalone="yes"?> 
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0"> 
<description>Mi programa</description>  
<dependency>                              
  <dependentAssembly>                   
    <assemblyIdentity 
      type="win32"                
      name="Microsoft.Windows.Common-Controls" 
      version="6.0.0.0"           
      publicKeyToken="6595b64144ccf1df" 
      language="*"                
      processorArchitecture="*" />                                
  </dependentAssembly>                  
</dependency>                             
</assembly>