如何设置vb中mschart的标签文本的字体颜色? 20
我的目标是显示两条温度-时间曲线,一条是实际值(红色),一条是设定值(蓝色),两条线的颜色不同,字体与曲线颜色相同,显示完成后,红色的曲线中,有几个点的字体颜色为黑色,代...
我的目标是显示两条温度-时间曲线,一条是实际值(红色),一条是设定值(蓝色),两条线的颜色不同,字体与曲线颜色相同,显示完成后,红色的曲线中,有几个点的字体颜色为黑色,代码如下:
With MSChart1
.ColumnCount = 2
.RowCount = UBound(GroupData, 1) + 1
.Plot.AutoLayout = True
.Plot.UniformAxis = False
.ChartData = GroupData '数据
.Column = 1: .ColumnLabel = "实时温度"
.Plot.SeriesCollection(1).Pen.VtColor.Set 255, 0, 0
.Plot.SeriesCollection(1).DataPoints(-1).DataPointLabel.VtFont.VtColor.Set 255, 0, 0
.Column = 2: .ColumnLabel = "设定温度"
.Plot.SeriesCollection(2).Pen.VtColor.Set 0, 0, 255
.Plot.SeriesCollection(2).DataPoints(-1).DataPointLabel.VtFont.VtColor.Set 0, 0, 255
End With。MSChart的宽度和高度是随窗体变化而变化的,当窗体的大小改变或最小化、最大化后,曲线的显示就变正常了,刚刚还是黑色的几个点,变成了设定的红色,求高手指点原因,及自动显示正常的方法?我试过在绘图之后改变窗体的大小、最小化、最大化或者重新show,但是不行。 展开
With MSChart1
.ColumnCount = 2
.RowCount = UBound(GroupData, 1) + 1
.Plot.AutoLayout = True
.Plot.UniformAxis = False
.ChartData = GroupData '数据
.Column = 1: .ColumnLabel = "实时温度"
.Plot.SeriesCollection(1).Pen.VtColor.Set 255, 0, 0
.Plot.SeriesCollection(1).DataPoints(-1).DataPointLabel.VtFont.VtColor.Set 255, 0, 0
.Column = 2: .ColumnLabel = "设定温度"
.Plot.SeriesCollection(2).Pen.VtColor.Set 0, 0, 255
.Plot.SeriesCollection(2).DataPoints(-1).DataPointLabel.VtFont.VtColor.Set 0, 0, 255
End With。MSChart的宽度和高度是随窗体变化而变化的,当窗体的大小改变或最小化、最大化后,曲线的显示就变正常了,刚刚还是黑色的几个点,变成了设定的红色,求高手指点原因,及自动显示正常的方法?我试过在绘图之后改变窗体的大小、最小化、最大化或者重新show,但是不行。 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询