无法打开被foxtable程序处理过的excel文件，具体情况如下：

1、先运行以下程序，对空值单元格赋值0。

Dim Book As New XLS.Book (ProjectPath & "双查进度本轮.XLS")
Dim Sheet As XLS.Sheet = Book.Sheets(0)
For i As Integer = 0 To sheet.Rows.Count - 1
    If Sheet(i,0).text = "合计" Then
        For r As Integer = i To Sheet.Rows.Count - 1
            For c As Integer = 1 To sheet.Cols.Count -1
                If Sheet(r,c).text = "" Then
                    Sheet(r,c).Value = 0
                End If
                If c > 49 Then
                    Exit For
                End If
            Next
            If r > 29 Then
                Exit For
            End If
        Next
    End If
Next
Book.Save (ProjectPath & "双查进度本轮.XLS")

2、打开双查进度本轮.XLS，出现“excel程序碰到一个问题中止运行”的错误。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:双查进度本轮.xls

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:双查进度本轮(程序处理过的).xls

我先杀了病毒，问题照旧，是我系统问题吗