Añadir skin a Formulario en Vb6

Hola a todos, aqui escribiendo aún de las experiencias en VB6, esta viejito el lenguaje para este tiempo, pero aún es un lenguaje muy utilizado por su sencillez, facilidad de programación, politicas, en fin...

Como poner un skin a un formulario o a un programa de VB6, bueno podemos descargar y ver los skin desde las url´s:

Todonet

Rvb

Si nuestro equipo no lo tiene (el mio no lo tenia) añadimos el .ocx "actskin4.ocx" que podemos descargar de internet, luego debemos copiarlo en la carpeta system32 y registrarlo con la linea: regsvr32 /s actskin4.ocx ó con regsvr32 /s  C:\WINDOWS\system32\actskin4.ocx, por si las dudas, guia.

Listo, ahora agregamos el Componente, ubicados en la mesa de trabajo de nuestro proyecto en VB6 vamos al menú de Proyecto->Componentes y seleccionamos en Controles la libreria "ActiveSkin 4.0 Type Library", arrastramos el objeto de skin al proyecto y desde la ventana de código en el Load( ) de formulario añadimos estas líneas de código:

 Form1.Skin1.LoadSkin App.Path & "\Skins\LinuxGnome.skn"
    Skin1.ApplySkin Form1.hWnd

Para añadirle el skin, eso es todo.

Advertencia: los objetos Label no se pueden visualizar para ver los Label utilicen el objeto LabelSkin que aparece al agregar la libreria y ya se ve con el tema o skin seleccionado.

Hasta pronto.