往“报名表”中合并数据时,(区)、(学校)这两列如果没有相同的值,执行合并;,(区)、(学校)这两列如果有相同的值,则不执行合并。怎么改写代码。
Dim dlg As New OpenFileDialog
dlg.Filter= "Excel文件|*.xls"
If dlg.ShowDialog = DialogResult.Ok Then
MessageBox.Show("你选择的是:" & dlg.FileName,"提示")
Dim mg As New Merger
mg.SourcePath = dlg.FileName
mg.Format = "excel"
mg.SourceTableName = "sheet1$"
mg.DataTableName = "报名表"
mg.Merge()
end if