主题：日本鬼子怎么来了？

大师：这是什么鬼？

导入excel表后      姓名、工资、   职务    执行下面的代码正确

                        王五   1000    经理

但把工资删除后导入，  姓名、           职务     执行下面的代码就出错，是什么原因？

                              王五   1000    经理

执行下面的代码

Dim maxcol As Integer = 100

Dim b1 As Table

Dim d As WinForm.Table = Forms("frmZcfzbList").Controls("Table2")

b1 = d.Table

For Each r1 As Row In b1.Rows

    For Each l1 As Col In b1.Cols

        If l1.Index > = maxcol Then

            Exit For

        Else

          If r1.IsNull(l1.name) = False  Then

            r1(l1.name) = trim(r1(l1.name).replace(" ",""))

          End If

        End If

    Next

Next