主题：[求助]怎么在导入excel时数据是，忽略下面的下面的错误提示？

要用xls.book处理，参考

Dim book As new XLS.Book("d:\test.xls")
Dim contain As Boolean = False
For i As Integer = 0 To book.Sheets.count-1
    If book.sheets(i).name = "sheet1" Then
        contain = True
        Exit For
    End If
Next
If contain Then
    msgbox(1)
Else
    msgbox(2)
End If