[雅培等三品牌是消费者更换奶粉首选]雅培：鼓励母乳喂养 倡导儿童营养研究 日前，由腾讯等门户网站联合对奶粉业进行的一项报网联合调查显示，人们的消费还是偏向进口奶粉，雅培等三大进口品牌是人们更换奶粉的首选。相...+阅读

1. 在项目中添加引用 DevExpress.BonusSkins和 DevExpress.OfficeSkins （这两个引用中有大量的皮肤，默认的只有几个）

2.在启动Form的 Designer文件中添加main函数

?

1

2

3

4

5

6

7

8

Shared Sub main()

'注册皮肤

DevExpress.UserSkins.OfficeSkins.Register()

DevExpress.UserSkins.BonusSkins.Register()

DevExpress.Skins.SkinManager.EnableFormSkins()

Application.Run(New XtraForm1（)）'启动窗口

End Sub

3.将项目的启动项修改为sub main（)， 若无此项，将下面的＂启动应用程序框架＂的勾去掉

4.在启动窗口添加控件DefaultLookAndFeel,

5.启动时在load事件中 添加

Me.DefaultLookAndFeel1.LookAndFeel.SkinName = ＂Office 2007 Blue＂ '皮肤名，可用其他

至此，实现换肤功能. 如果要实现启动后更换皮肤， 可以把所有可用的皮肤名放到ComboBoxEdit1中即可.

附：

默认的皮肤名：Caramel,Money Twins,Lilian,The Asphalt World,iMaginary,Black,Blue

BonusSkins的皮肤名：Coffee,Liquid Sky,London Liquid Sky,Glass Oceans,Stardust,Xmas 2008 Blue,Valentine,McSkin,Summer 2008,Pumpkin,Dark Side,Springtime,Darkroom,Foggy,High Contrast,Seven,Seven Classic,Sharp,Sharp Plus,DevExpress Style

Office的皮肤名：Office 2007 Blue,Office 2007 Black,Office 2007 Silver,Office 2007 Green,Office 2007 Pink,Office 2010 Blue,Office 2010 Black,Office 2010 Silver

得到皮肤名的代码

Dim str As String = ＂＂

For Each skinName As DevExpress.Skins.SkinContainer In DevExpress.Skins.SkinManager.Default.Skins

str = str & skinName.SkinName & ＂,＂

Next

以下为关联文档：

更换避孕方法应该注意哪些问题是否可以随意更换避孕方法？有些什么问题需要注意？ 下面介绍常用的几种避孕方法及更换时应该注意的一些问题： (1)服用短效避孕药的妇女改用长效避孕药时，至少要在服完短效避孕药...

烹调用油需不断更换每个品种的油都有各自的优势，但都无法为人体提供足够全面的营养。因此，各国的营养专家都强调，时常更换食用油的品种，可以均衡摄取各种不饱和脂肪酸和脂溶性维生素。 据世界卫生...

请问我的孩子有必要更换奶粉吗三个月前，在儿子没有出生前，他的儿科大夫就推荐雀巢的一种防敏奶粉，大陆一直没有这种类型产品销售，医生说只有在香港才有售，由于买不到，我们就买了雀巢能恩金盾1段吃的，已经吃了三...

是否更换奶粉我儿子已经100天了,可每次只吃150毫升,4个小时一次,这样是否影响孩子发育,用不用换奶粉 宝宝100天的话， 也不吃得太少呀 ， 四个钟一次，视乎每个宝宝的情况不同而没有一致的！ 放...

如何安装易语言皮肤控件:SkinSharp皮肤控件 For 易语言0.5.0 API调用方法 DLL命令名返回值类型公开备注 加载默认皮肤整数型 √ 加载程序当前目录下的skinh.she皮肤，成功返回0 DLL库文件名： SkinH_EL...

更换避孕方法的注意事项有哪些1、在更换避孕方法之前，必须对新的方法有充分的了解，掌握正确的使用方法。 2、不论服用哪一种，要改用其他避孕方法，必须坚持服完一个月经周期，决不可中途更换，否则会造成月经紊乱...