以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求助 窗口菜单颜色  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=109772)
--  作者：jackyfashion
--  发布时间：2017/11/19 11:36:00
--  求助 窗口菜单颜色

老师:

   您好!

 

请问窗口菜单能设置BackColor颜色吗?

请指教!

谢谢!!!
--  作者：zcgmxf
--  发布时间：2017/11/19 12:31:00
--  
可以
                              Dim o3 As object = e.form.Strips("工具栏1").basecontrol
                              o3.RenderMode = System.Windows.Forms.ToolStripRenderMode.System
                              o3.AutoSize = False
                              o3.Height = 200 
                              o3.font = new font("宋体", 23) \'设置字体
                              o3.ForeColor = Color.blue  \'设置字体颜色
--  作者：有点甜
--  发布时间：2017/11/19 15:21:00
--  
Dim o3 As object = e.form.Strips("工具栏1").basecontrol
Dim fnt As New Font("宋体",10.5 ) \' ,FontStyle.bold)
o3.RenderMode = System.Windows.Forms.ToolStripRenderMode.System
o3.font = fnt  \'
o3.GripStyle = 0
o3.ForeColor = Color.white
o3.backcolor = Color.OliveDrab
o3.autosize = false
o3.height = 100
--  作者：jackyfashion
--  发布时间：2017/11/20 11:14:00
--  
谢谢老师!!!
--  作者：jackyfashion
--  发布时间：2017/11/20 11:15:00
--  
谢谢五尾狐老师!!!
--  作者：jackyfashion
--  发布时间：2017/11/20 20:53:00
--  
老师:
                        您好!
请问在那个事件写代码?

谢谢指教!!!
[此贴子已经被作者于2017/11/20 20:53:29编辑过]
--  作者：有点蓝
--  发布时间：2017/11/20 21:00:00
--  
一般在窗口afterload
--  作者：jackyfashion
--  发布时间：2017/11/21 0:01:00
--  
谢谢有点蓝老师!!!