主题：表导出问题

 用下面的代码

Dim dlg As new SaveFileDialog
dlg.Filter = "Excel|*.xls;*.xlsx"
If dlg.ShowDialog = DialogResult.OK Then
    CurrentTable.SaveExcel(dlg.FileName, CurrentTable.Name)
    Dim proc As new Process
    proc.File = dlg.FileName
    proc.Start
End If