bueno he seguido tu consejo...
pero no realiza ningun cambio, lo que tengo ahora mismo es esto ...
Código:
PublicClass Form1
Dim skin1 As Skin
PrivateSub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesMyBase.Load
Me.skin1 = New Skin()
Me.skin1.LoadSkin("C:\SKIN\metallic.skn")
Me.skin1.ApplySkin(Me.Handle)
EndSub
EndClass