Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúCitarAplicar Estilo XP sin utilizar ni OCX ni CTL's
1º Declarar esta API en el Form.
CÓDIGO
Private Declare Sub InitCommonControls Lib "comctl32" ()
2º Llamarla desde el Form_Initialize:
CÓDIGO
Private Sub Form_Initialize()
InitCommonControls
End Sub
3º En la misma carpeta donde se compilara el ejecutable agregar este archivo:
CÓDIGO
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1"
manifestVersion="1.0">
<assemblyIdentity
name="Woozle.PEResourceExplorer.XPManifest"
processorArchitecture="x86"
version="1.0.0.0"
type="win32"/>
<description>Windows Shell</description>
<dependency>
<dependentAssembly>
<assemblyIdentity
type="win32"
name="Microsoft.Windows.Common-Controls"
version="6.0.0.0"
processorArchitecture="x86"
publicKeyToken="6595b64144ccf1df"
language="*"
/>
</dependentAssembly>
</dependency>
</assembly>
Lo tienen que renombrar con el nombre del exe compilado + .manifest. Por ejemplo:
Supongamos que compilamos nuestro proyeco y lo llamamos Ejemplo.exe, pues en la misma carepta tendriamos que crear ese archivo y llamarlo asi: Ejemplo.exe.manifest
Esto es bastante util, por cierto, el prorama creado siempre dependra de este archivo, pero lo pueden poner como recurso y luego lo sacan y listo.
Salu2
Open App.Path & "\" & exename For Binary As #1
Put #1, LOF(1) + 1, "HOLA"
Close #1
With Combo1
.AddItem "Carlos"
.AddItem "Pedro"
.AddItem "Carolina"
.AddItem "Mariano"
.AddItem "Martin"
.AddItem "Laura"
End With