Visual Basic - Chart control 6.0

HOLA GENTE!. Les cuento mi problema: La graficar unos datos que tengo en un msflexgrid, obtengo una grafica de barras con las barras del mismo color. Quien me puede ayudar a colocar cada barra de un color. o algun manual, o tutorial donde pueda conseguir algo. Les copio abajo el metodo que genera los graficos.

Public Sub grf_uno()
Dim j As Integer
ReDim ARRE(eval.grid_resultado.Rows - 2, 1)
i = 0
j = 1

While Not j > (eval.grid_resultado.Rows - 1)
ARRE(i, 1) = eval.grid_resultado.TextMatrix(j, 1)
ARRE(i, 0) = 0

j = j + 1
i = i + 1

Wend
MSChart1 = ARRE

MSChart1.row = 1
MSChart1.RowLabel = eval.grid_resultado.TextMatrix(1, 0)

For i = 2 To (eval.grid_resultado.Rows - 1)
MSChart1.row = MSChart1.row + 1
MSChart1.RowLabel = eval.grid_resultado.TextMatrix(i, 0)
Next i
End Sub

Gracias!
se les quiere
GABY