最多这种效果了
Dim Chart As WinForm.Chart = Forms("窗口1").Controls("Chart1")
Dim ctl As C1Chart.C1Chart = Chart.BaseControl
ctl.ChartGroups(0).HiLoData.FillTransparent = False
ctl.ChartGroups(0).HiLoData.FillFalling = False
ctl.ChartGroups(0).ChartData.SeriesList(0).LineStyle.Color = Color.red
ctl.ChartGroups(0).ChartData.SeriesList(0).SymbolStyle.Color = Color.green