主题：关于Excel导入的问题

同样的一段代码，如下：

Dim Book As New XLS.Book("c:\test.xls")
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Tables("成本").StopRedraw()

Dim nms() As String = {"全称","类型","工号","说明","数量"}

For n As Integer = 1 To Sheet.Rows.Count -1
    Dim r As Row = Tables("成本").AddNew()
    For m As Integer = 0 To nms.Length - 1
         r(nms(m)) = Sheet(n,m).Value
    Next
Next
Tables("成本").ResumeRedraw()

用在命令窗口就可以执行，但是做成窗体的按钮的Click属性就不执行，什么也不现实，求指点。

就是这个，我将代码复制到命令窗口就没问题，按钮就不行，麻烦帮我看看，谢谢狐狸爸爸。

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

点击浏览该文件:test.xls

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

点击浏览该文件:成本.table

我单击你的按钮，测试没有问题，将代码复制到命令窗口也没有问题。

建议：

1、升级你的foxtable到最新的版本

2、安装.net framework 2.0 sp2

http://download.microsoft.com/download/c/6/e/c6e88215-0178-4c6c-b5f3-158ff77b1f38/NetFx20SP2_x86.exe

谢谢狐狸爸爸，安装.net framework 2.0 sp2，这个之后没问题了。