以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  合并数据  (http://foxtable.com/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了,谢谢老师!