Set MSHFlexGrid column width

Hi,

I would like to know how to know to set the width of the columns in the MSHFlexGrid.

My code is:
Public Function display_in_datagrid()
frmSendMMS.Height = 9315
frmSendMMS.Width = 14535
fraMMSStatus.Visible = True
If chckSchedule.Value = Unchecked Then
mms_status.RecordSource = "SELECT id1 as ID, sender, recipient,subject,status FROM mms_outbox;"
Else
mms_status.RecordSource = "SELECT id1 as ID, sender, recipient,subject,status, sending_time FROM schedule;"
End If
mms_status.Refresh
MSmmsStatus.Refresh
' Sleep (2000)
' MSmmsStatus.Width = 1.5 * 1444
End Function

example.

fgrid.colwidth(0) = 0