窗口按钮导入
请教，先选择电子表格，再导入
用如下语句：
Dim dlg As New OpenFileDialog '定义一个新的OpenFileDialog
dlg.Filter= "Excel文件|*.xls|Word文件|*.doc|Access文件|*.mdb" '设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
MessageBox.Show("你选择的是:" & dlg.FileName,"提示") '提示用户选择的文件
End If
然后将所选定的表格导入，导入后的表名为：表A1 后面的代码，怎写啊？
Dim ip as New Importer
ip.SourcePath = ？？？？？？ '指定数据文件
ip.SourceTableName = "表A1" '指定要导入的表
ip.NewTableName ="表A1"
'导入后的表名
ip.Format = "Excel"
'指定导入格式
ip.Import()
加好友 
发短信
Post By：2017/8/5 7:14:00 [只看该作者]
