新手提问..VB6.0的tchart v2010中添加很多随机颜色的曲线后,曲线颜色和图例颜色不一致~

新手提问..VB6.0的tchart v2010中添加很多随机颜色的曲线后,曲线颜色和图例颜色不一致~
代码如下:

界面如下:

因为曲线太多所以设置图例不显示,加了teelistbox,但是它和图例的每个序列颜色是一致的,
在此救助各位大神,有没有办法设置图例的每个系列颜色和每条曲线颜色一致~
初始的tchart里是没有添加系列的~
再次先拜谢各位大神~ 设计界面中，在tchart控件上点鼠标右键，选属性…… ？谢谢理我啊...
主要是我写的代码是随机的颜色..应该是每运行一次颜色就随机一次..
而且有不同组分类,每组的个数又不一样..所以没办法一次次的设置曲线的颜色... 好啦问题解决~
With TChart1
        .RefreshData
        .AddSeries scLine
        .AddSeries scLine
        .Series(2 * k - 2).XValues.DateTime = True
        .Series(2 * k - 1).XValues.DateTime = True
        .Series(2 * k - 2).Title = (ListView1.ListItems.Item(k)) & "产水量"
        .Series(2 * k - 1).Title = (ListView1.ListItems.Item(k)) & "产气量"
        .Series(2 * k - 2).VerticalAxis = aLeftAxis
        .Series(2 * k - 1).VerticalAxis = aRightAxis
        .Series(2 * k - 2).Color = RGB(Rnd * 256, Rnd * 256, Rnd * 256)
        .Series(2 * k - 1).Color = RGB(Rnd * 256, Rnd * 256, Rnd * 256)
        .Legend.LegendStyle = lsSeries
      For i = 1 To UBound(z3, 2) - 1
       TChart1.Series(2 * k - 2).AddXY (z3(k, i)), z1(k, i), "", TChart1.Series(2 * k -2).Color
       TChart1.Series(2 * k - 1).AddXY (z3(k, i)), z2(k, i), "", TChart1.Series(2 * k -1).Color
      Next
End With

补充：VB ,  控件