Llenar FLEXGRID

Esto es bastante fácil.
Primero para establecer una consulta sql:
'*************************************
Dim DB As New Connection
Dim RS As New Recordset
Dim Direccion as String
Dim Sql as String
Direccion = App.path & "\MiBd.mdb"
SQL = "SELECT * FROM [Clientes]"
DB.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source=" & Direccion & ";"
RS.Open SQL, DB, adOpenKeyset, adLockOptimistic
'*************************************
'Ahora para cargar en un MSFlexGrid:
'*************************************
MSFlexGrid1.Cols = RS.Fields.Count + 1
MSFlexGrid1.Rows = RS.RecordCount + 1
MSFlexGrid1.Row = 0
A = 0
While Not A = RS.Fields.Count
MSFlexGrid1.Col = A + 1
MSFlexGrid1.Text = RS.Fields(A).Name
A = A + 1
Wend
'Colocamos la cantidad de columnas y filas
Counta = 0
While Not RS.EOF
MSFlexGrid1.Row = Counta + 1
B = 0
While Not B = RS.Fields.Count
MSFlexGrid1.Col = B + 1
If Not IsNull(RS.Fields(B)) Then
MSFlexGrid1.Text = RS.Fields(B)
End If
B = B + 1
Wend
RS.MoveNext
Counta = Counta + 1
Wend
'*************************************
'Y Para el DataGrid se hace bastante facil
'*************************************
Set DataGrid.Datasource = RS

Okis si ya veo la gran diferencia, ¿pero me podrías decir cual es al diferencia/ventaja/el porque entonces utilizar un flex en vez de un datagrid? ¿O en que casos?