以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何读出Excel2016表格的列名？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=87831)
--  作者：lmlptj
--  发布时间：2016/7/20 17:24:00
--  如何读出Excel2016表格的列名？
如题所问：
想解决的问题及步骤：
1、系统有一表，假定字段名分别为 A、B……D
2、各单位上的EXecel表，字段有若干；
3、指定Excel中表格中的部分字段分别一一对应表系统表内某字段进行导入操作
如何完成呢？？？
--  作者：大红袍
--  发布时间：2016/7/20 17:28:00
--  

 参考

 

下载信息  [文件大小：31.3 KB  下载次数：7]
图片点击可在新窗口打开查看点击浏览该文件:导入excel文件.zip

 

 参考

 

http://www.foxtable.com/webhelp/scr/0685.htm

 
--  作者：lmlptj
--  发布时间：2016/7/20 17:52:00
--  
没有看懂！只想如何读出Excel表格的列名或列标题？？
--  作者：大红袍
--  发布时间：2016/7/20 17:58:00
--  

 循环excel的第一行，就能读出

 

Dim Book As New XLS.Book("d:\\test.xls")
Dim Sheet As XLS.Sheet = Book.Sheets(0)
For i As Integer = 0 To sheet.cols.Count - 1
    msgbox(sheet(0,i).text)
Next