Uso De Skin Vb Net

[USO DE SKIN EN VB .NET]

Siempre hay algo nuevo que Aprender

Aplicando Skin En Visual .Net 1. Creamos Un nuevo proyecto

[email protected]

[email protected] |

1

[USO DE SKIN EN VB .NET]

Siempre hay algo nuevo que Aprender

2. A nuestro formulario le asignamos las siguientes propiedades en la ventana de propiedades (esto es opcional) Ya que pueden poner cualquier nombre u otras características como Nombre le pondremos frmMafia

[email protected]

[email protected] |

2

[USO DE SKIN EN VB .NET]

Siempre hay algo nuevo que Aprender

3.- Tenemos que agregar el en control OCX actskin4.ocx para ello no vamos a: - Menú Proyecto --> Componentes o

Simplemente Pulsamos las teclas Ctrl + T

4.- En esta Ventana nos muestra todos los controles agregados para agregar nuestro OCX actskin4.ocx le damos Click en botón Examinar

[email protected]

[email protected] |

3

[USO DE SKIN EN VB .NET]

Siempre hay algo nuevo que Aprender

5.-Una ves encontrado el OCX le damos Click en el botón Abrir

6.- Como vemos el actskin4.ocx ya se agrego a la lista de componentes ahora le damos clik en en botón Aceptar

[email protected]

[email protected] |

4

[USO DE SKIN EN VB .NET]

Siempre hay algo nuevo que Aprender

7.- Como observamos skin ya esta en el cuadro de herramientas y ya podrás usarlo

[email protected]

[email protected] |

5

[USO DE SKIN EN VB .NET]

Siempre hay algo nuevo que Aprender

3. Agregamos el Skin al formulario para ello solo arrástrelo

4. Le asignamos las siguientes propiedades al skin como se muestra el la imagen

[email protected]

[email protected] |

6

[USO DE SKIN EN VB .NET]

Siempre hay algo nuevo que Aprender

5. Agregamos un skinlabel al formulario

[email protected]

[email protected] |

7

[USO DE SKIN EN VB .NET]

Siempre hay algo nuevo que Aprender

6. Ahora ya esta listo no vamos a la venta de código y escribimos el código como se muestra a continuación. Public Class frmMafia Private Sub frmMafia_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Call SkinMafia() End Sub Sub SkinMafia() With Me.AxSkinForm1 .LoadSkin("SkinMafia.skn") .ApplySkin(0) End With End Sub End Class

[email protected]

[email protected] |

8

[USO DE SKIN EN VB .NET]

7.

Siempre hay algo nuevo que Aprender

Listo ya terminamos de aplicar el Skin para ver el resultado simplemente presión a la tecla F5 El resultado seria así como se muestra en la figura:

[email protected]

[email protected] |

9

[USO DE SKIN EN VB .NET]

Siempre hay algo nuevo que Aprender

8. Aquí tengo otro Skin que io lo cree, ver figura

Nota: Quieres el ejemplo mostrado escríbenos a : [email protected]

[email protected]

[email protected]

[email protected] |

10

[USO DE SKIN EN VB .NET]

[email protected]

Siempre hay algo nuevo que Aprender

[email protected] |

11