施用vb6.0在vsflexgrid控件中导入excel数据表时，不能导入姓名列

使用vb6.0在vsflexgrid控件中导入excel数据表时，不能导入姓名列
我在使用vb6.0在vsflexgrid控件中导入excel数据表时，不能导入姓名列。不知道怎么回事？代码如下：

Private Sub Form_Load()

'设置vsflexgrid表格控件的初始属性

With VSFlexGrid1

   

   .Editable = flexEDKbd

   .AutoSizeMode = flexAutoSizeRowHeight

   .AutoSizeMouse = True

   .ExplorerBar = 12         '设置可以单击列头时进行排序

   .AllowUserResizing = flexResizeBoth   '设置可以手动调整行列宽度

   .BackColorAlternate = RGB(255, 250, 230)  '间隔行背景色

   .GridColor = RGB(0, 0, 10)           '单元线条色

   .Cols = 6

   .ColWidth(2) = 700          '指定列宽（设置没有变化？？？）

End With

On Error GoTo err

            Dim sFileName As String

           

             With CommonDialog1

                .CancelError = False

                .DefaultExt = "*.xls"

                .DialogTitle = "请选择EXCEL文件"

                .FileName = "*.xls"

                .Filter = "MICROSOFT OFFICE EXCEL 文件(.xls)"

                .ShowOpen

            End With


            With VSFlexGrid1

                .LoadGrid CommonDialog1.FileName, flexFileExcel, False

            End With

Exit Sub

VSFlexGrid1.flexSTSum 2


err:

   MsgBox err.Description, vbInformation, MSG_TITLE

End Sub

------解决方案--------------------
.LoadGrid CommonDialog1.FileName, flexFileExcel, True