Visual Basic - Ayuda con MSFlexGrid en VB6 (LIMPIAR)

Private Sub command2_Click()

For X = 1 To MSFlexGrid1.Rows - 1

  For i = 0 To MSFlexGrid1.Cols - 1

    MSFlexGrid1.TextMatrix(X, i) = ""

  Next

Next

End Sub

Private Sub command1_Click()

For X = 1 To MSFlexGrid1.Rows - 1

  For i = 0 To MSFlexGrid1.Cols - 1

    MSFlexGrid1.TextMatrix(X, i) = "FILA" + Str(X) + ", COLUMNA" + Str(i)

  Next

Next

End Sub

Private Sub Form_Load()

 MSFlexGrid1.Rows = 10

 MSFlexGrid1.Cols = 5

 For i = 0 To MSFlexGrid1.Cols - 1

    MSFlexGrid1.TextMatrix(0, i) = "Col" + Str(i) 'pone el titulo a las columnas

    MSFlexGrid1.ColWidth(i) = 1800 'asigna ancho a la columna

 Next

End Sub