以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  TabControl样式调整  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=173265)

--  作者:cd_tdh
--  发布时间:2021/11/22 9:28:00
--  TabControl样式调整

老师,以下代码调整TabControl样式,部分成功,部分不成功,请看看有什么问题

Dim tab As WinForm.TabControl = Forms("主窗口").Controls("TabControl1")
Dim c1tab As C1.Win.C1Command.C1DockingTab = tab.basecontrol
c1tab.VisualStyle = C1.Win.C1Command.VisualStyle.Custom
c1tab.TabAreaBackColor = Color.SteelBlue \'标题区域的背景色,修改成功
c1tab.BackColor = Color.Red              \'控件背景色,修改不成功
c1tab.SelectedTabBold = True             \'选中的页签标题加粗,修改成功
Dim pg As WinForm.TabPage = tab.SelectedPage \'当前页面
pg.TabForeColorSelected= Color.SteelBlue         \'选定项标题字体颜色,修改成功
pg.TabBackColor = Color.White  \'Red              \'鼠标进入标题背景色,修改不成功
pg.TabBackColorSelected = Color.SteelBlue        \'选定页面标题背景色,修改不成功
pg.BackColor = Color.White                   \'选定页面背景色,修改成功


--  作者:有点蓝
--  发布时间:2021/11/22 9:35:00
--  
去掉样式
tab.Theme = "(none)"

--  作者:cd_tdh
--  发布时间:2021/11/22 11:20:00
--  

去掉后,标题区域的背景色修改不成功

c1tab.TabAreaBackColor = Color.SteelBlue


--  作者:有点蓝
--  发布时间:2021/11/22 11:41:00
--  
Dim tab As WinForm.TabControl = Forms("窗口1").Controls("TabControl1")
tab.Theme = "(none)"
Dim c1tab As C1.Win.C1Command.C1DockingTab = tab.basecontrol
c1tab.VisualStyle = C1.Win.C1Command.VisualStyle.Custom
c1tab.TabStyle = 2
c1tab.TabAreaBackColor = Color.Blue

--  作者:cd_tdh
--  发布时间:2021/11/22 12:33:00
--  

 
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20211122122928.jpg
图片点击可在新窗口打开查看

这就好看多了,就差图表的柱状图的颜色了,这样几个图表几个颜色,每次刷新还是变一个颜色,现在这个结果是之前按照老师的代码修改了的,怎么指定柱状图的颜色呢?

Dim b As C1.Win.C1Chart.C1Chart = e.Form.Controls("Chart3").BaseControl
b.BackColor = Color.white   
b.ChartArea.Style.BackColor = Color.white \'图板颜色
b.ChartArea.Style.Border.BorderStyle = 0  \'图板外形框线型
b.ChartArea.Style.GradientStyle = 0    \'图板外形框样式

 

这样报错

Chart = e.Form.Controls("Chart1") \' 引用窗口中的图表
Chart.AxisX.LineStyle.Color = Color.Red  \'X坐标轴颜色(这样报错)

[此贴子已经被作者于2021/11/22 13:14:00编辑过]

--  作者:有点蓝
--  发布时间:2021/11/22 13:33:00
--  
http://www.foxtable.com/webhelp/topics/1042.htm
--  作者:zhutangxin
--  发布时间:2021/11/22 21:54:00
--  
Mark
--  作者:cd_tdh
--  发布时间:2023/4/26 17:22:00
--  
请教一下老师,柱状图的外框线颜色有没参数可以单独设置?

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20230426172505.jpg
图片点击可在新窗口打开查看

[此贴子已经被作者于2023/4/26 17:25:21编辑过]

--  作者:有点蓝
--  发布时间:2023/4/26 17:37:00
--  
没找到设置的方法