主题：求助!急等答复

项目是我们在日常工作中使用的，有N多地方需要从excel中导入数据，绝大部分用Merge()导入.

如其中某一处的导入代码如下：

If MessageBox.Show("任务Excel文件准备好了吗?","请确认",MessageBoxButtons.YesNo,MessageBoxIcon.Question)=DialogResult.Yes Then

    Dim dlg As New OpenFileDialog

    dlg.Filter= "Excel文件|*.xls" 

    If dlg.ShowDialog = DialogResult.Ok Then

        Dim mg As New Merger

        mg.SourcePath = dlg.FileName

        mg.Format = "excel"

        mg.SourceTableName = "sheet1$"

        mg.DataTableName = "任务"

        If MessageBox.Show("当前任务单是否删除?","请确认",MessageBoxButtons.YesNo,MessageBoxIcon.Question)=DialogResult.Yes Then

            DataTables("任务").datarows.clear

            mg.Merge()

        Else

            mg.Merge()

        End If       

        MessageBox.Show("客户任务单已导入!")

    End If

End If

第三句代码dlg.Filter= "Excel文件|*.xls"造成不能导入.xlsx文件。

虽然改为dlg.Filter= "Excel文件|*.xl*"后可以导入.xlsx，但是N多处的代码修改很是麻烦。

卸载Windows昨天的更新Kb4041678后问题也解决了，但又担心windows漏洞。

不管怎样，目前起码可以正常工作了，非常感谢。希望后面有更好的解决办法，避免类似情况发生。