[VB6]: MsFlexgrid - Togliere la prima riga

[vr-claudio]

Ciao ragazzi
arrivo subito al dunque, ho una MsFlexGrid che con un pulsante carico il database che ho crato, in questo modo:

Private Sub ApriDataBase()
Dim RigaGrid As Integer
On Error Resume Next
FLEX.Rows = 1
Dim DB As Database
Dim rst1 As Recordset
Set DB = OpenDatabase("C:\VENDITA\DB\DB_LO.mdb")
Set rst1 = DB.OpenRecordset("SELECT ID, INDICE, CATEGORIA FROM TIPOLOGIA")
Do While Not rst1.EOF
Dim i As Integer
With FLEX

FLEX.AddItem rst1.Fields("INDICE") & vbTab _
& rst1.Fields("CATEGORIA").Value

End With
rst1.MoveNext
Loop

rst1.Close
DB.Close
End Sub

Dato che ho creato una Flex Editabile con una TextBox, vorrei che la prima riga non sia editabile, come posso fare?
Grazie vr-claudio