主题：关于窗口中的状态栏

Dim zcd = e.Form.Strips("主菜单").basecontrol
zcd.RenderMode = System.Windows.Forms.ToolStripRenderMode.System
Dim m = e.Form.Strips("主菜单").Items("项目1").basecontrol
m.Font = new Font("黑体",12)
m.forecolor = color.red
m.backcolor = color.black

这个方法我知道的。我说的只仅仅改变这一个Item。 如果zcd.RenderMode = System.Windows.Forms.ToolStripRenderMode.System，会把整个工具条风格都改变了。

必须把风格修改了你才能修改某一个item的。

你可以设置状态栏整体的背景颜色等。

 你可以设置背景颜色，也可以设置背景图片

Dim zcd = e.Form.Strips("状态栏").basecontrol
zcd.RenderMode = System.Windows.Forms.ToolStripRenderMode.System
Dim m = e.Form.Strips("状态栏").Items("项目1").basecontrol
m.Font = new Font("黑体",12)
m.forecolor = color.red
m.backcolor = color.black

'zcd.BackColor = Color.Blue

'zcd.BackgroundImage = GetImage("g:\test.jpg")
'zcd.BackgroundImageLayout = 3