Imports ExcelReaderPlugin.ExcelReader
Dim FilePath as string = "C:/201604.xlsx"
Using xls As New ExcelReaderPlugin.ExcelReader(FilePath)
xls.GetDataSet(True) 'Return DataSet
xls.GetDataTable(0) 'Return DataTable
xls.GetSheetNames() 'Return List(of String)
xls.GetSheetNames_DataTable() 'Return DataTable
xls.GetSheetCount() 'Return Integer
End Using
Methods Code (VB.NET)
GetSheetNames()
'ชื่อชีททั้งหมด รีเทิร์นออกมาเป็น List (Of String)
GetSheetNames_DataTable()
'ชื่อชีททั้งหมด รีเทิร์นออกมาเป็น DataTable มีหนึ่ง Column ชื่อว่า Name
GetSheetCount() As Integer
'จำนวนของชีททั้งหมด
GetDataSet(Optional SetColumnNameWithColumnHeader As Boolean = False, Optional ByVal AutoChangeColumnDataType As Boolean = False) As System.Data.DataSet
'ข้อมูลทั้งหมดในไฟล์ excel โดยแปลงข้อมูลให้อยู่ใน DataSet แล้ว
'SetColumnNameWithColumnHeader = กำหนดชื่อคอลัมน์จากข้อมูลแถวแรก (อย่างเช่นพวกไฟล์ csv ที่หัวคอลัมจะอยู่ที่แถวแรก)
'AutoChangeColumnDataType = เปลี่ยนประเภทข้อมูลของคอลัมน์ตามข้อมูลแถวแรกไม่รวมแถวที่ตั้งเป็นชื่อคอลัมน์
GetDataTable(ByVal SheetIndex As Integer, Optional ByVal SetColumnNameWithColumnHeader As Boolean = False, Optional ByVal AutoChangeColumnDataType As Boolean = False) As System.Data.DataTable
'ข้อมูลทั้งหมดตามอินเด็กซ์แถบชีทโดยแปลงข้อมูลให้อยู่ใน DataTable แล้ว
'SheetIndex = อันดับของชีทที่เลือก
'SetColumnNameWithColumnHeader = กำหนดชื่อคอลัมน์จากข้อมูลแถวแรก (อย่างเช่นพวกไฟล์ csv ที่หัวคอลัมจะอยู่ที่แถวแรก)
'AutoChangeColumnDataType = เปลี่ยนประเภทข้อมูลของคอลัมน์ตามข้อมูลแถวแรกไม่รวมแถวที่ตั้งเป็นชื่อคอลัมน์