主题：请教怎么把几个Excel表导入到Foxtable已存在的表格中

这样看看:

Dim dlg As New OpenFileDialog

dlg.Filter= "Excel文件|*.xls|Word文件|*.doc|Access文件|*.mdb" 

If dlg.ShowDialog = DialogResult.Ok Then 

    Dim mg As New Merger

    mg.SourcePath = dlg.FileName

    mg.Format = "excel" 

    mg.SourceTableName = "手术信息查询$" 

    mg.DataTableName = "手术" 

    mg.Merge() 

End If