FlexGrid Problems

[shovels]

Hi,
I'm trying to populate a FelxGrid using the following code:

With mfgMSFlexGrid1
Do Until rs.EOF
For lngCol = 1 To rs.Fields.Count - 1
.TextMatrix(lngRow, lngCol) = rs(lngCol)
Next lngCol
rs.MoveNext
lngRow = lngRow + 1
Loop
End With

This code works fine, but I've got the following problem:-

How can I set up the column width specifications at run-time? The input into the grid varies each time, so likewise the colum width needs to aswell. e.g. The width for a column containing 'email addresses' needs to be greater than the width for a column containing 'Firstnames'.

Any suggestions or help would be greatly appreciated!
cheers,
shovels