hi friends I want to align my mshflexgrid to center;I tried

Private Sub Form_Load()
Dim i As Integer
For i = 1 To MSHFlexGrid1.Rows - 1
MSHFlexGrid1.CellAlignment = flexAlignCenterCenter
Next i
End Sub

but nothing happend ,what's wrong?