主题：导入报错

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 = "sheet1$"
mg.DataTableName = "表A"
mg.Fields ="产品编号,实盘数"
mg.Format = "excel" '指定格式
mg.Merge()
End If

一直提示 至少有一个参数没有指定