以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  合并数据  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=64077)
--  作者：ccbbdlzj
--  发布时间：2015/2/4 14:10:00
--  合并数据

编码合并excel文件时，想让用户选择文件后，合并指定的文件，代码如下：

1、  Dim dlg As New OpenFileDialog
2、  dlg.Filter= "Excel文件|*.xls"
3、 If dlg.ShowDialog = DialogResult.OK Then
  

4、  Dim strs As String = dlg.FileName

5、Dim Book As New XLS.Book("& strs &")
6、Dim  Sheet As XLS.Sheet = Book.Sheets(0)

 

第5行的  ("& strs &")部分咋写？
--  作者：有点甜
--  发布时间：2015/2/4 14:29:00
--  
Dim Book As New XLS.Book(strs)
--  作者：Bin
--  发布时间：2015/2/4 14:29:00
--  
Dim Book As New XLS.Book(dlg.FileName)
--  作者：ccbbdlzj
--  发布时间：2015/2/4 14:31:00
--  
ok了，谢谢老师！