Ayuda con un FlexGrid & Limpiarlo

[CAGS]

Hola estoy tratando de limpiar un FlexGrid para poder ingresar nuevos datos, pero ya probe con algunas cosas y nada, como por ejemplo:

MSFlexGrid1.clear --> esto si me lo limpia, el problema es que la siguiente consulta2 me la pone a partir de la ultima fila en que finalizo la primer consulta1

ColCounter = 0
ColCounter = Re1.Rows
'For I = ColCounter - 1 To 1
'Re1.RemoveItem (I)
'Next

Esto tampoco me funciono, se salta el for, ni si quiera entra....

Lo que yo busco es restaurar el Flex para que cada que realize una nueva busqueda me la ponga en la primera fila.

Alguien me podria ayudar!!!!