主题：新手求教,我想在下拉框里导入选定的excel文件~~

dlg.Filter= "Access文件|*.mdb" '设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
    Dim mg As New Merger
    mg.SourcePath = dlg.FileName
    mg.SourceTableName = "订单"
    mg.DataTableName = "订单"
    mg.Merge()
End If

我现在的代码是这样的。

Dim dlg As New OpenFileDialog '定义一个新的OpenFileDialog

dlg.Filter= "Excel文件|*.xls" '设置筛选器

If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮

    Dim mg As New Merger

    mg.SourcePath = dlg.FileName

    mg.SourceTableName = "成绩统计$"

    mg.DataTableName = "初一学生成绩"

    mg.Merge()

End If

提示运行错误。不可识别的数据库格式 'C:\初一学生成绩.xls'。