Apariencia Win Xp

[Lambda]

he visto varios programas k exos cn el VB 6 los botones, las barras de progreso y demas se ven cn la apariencia dl XP, pero los programas k ago no se ven asi, se ven como en el Win 98, eso es lo k quiero saber, como ago pa k salgan asi  :PxD

salu2 ^^

[BenRu]

Agrega esto:

Código [Seleccionar] Expandir

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

Y esto:

Código [Seleccionar] Expandir

Private Sub Form_Initialize()
InitCommonControls
End Sub

Despues deberas dejar un manifest, (Programa.exe.manifest):

Código [Seleccionar] Expandir

<?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> 

Un saludo

[Lambda]

gracias ^^, pero una cosa, cuando se compila hace falta el manifiest? o no :S

salu2

[Robokop]

No mira lo que debes de hacer es compilar el archivo normal con los codigos que te dio BenRu ya que este compilado en el mismo directorio del exe creas un archivo de texto y pegas el contenido xml , y lo guardas con el nombre del ejecutable que quieres que tenga la apariencia mas .exe.manifest
quedaria asi en la carpeta
ejecutable.exe y ejecutable.exe.manifest