我最近在做的项目是这样做的:
首先把Excel表中的内容复制,然后粘贴到Access表中,导出为XML文件,然后将xml文件添加到resources中,再在xml中执行各种操作,因为XML文件更好操作点,.net平台提供了很多xml文件的操作方法,能够很方便的借助LINQ进行查询,增加等操作。下面是我最近项目中的一段,希望能给你点启发:
Public Sub InitSvSumCell(ByVal xmlStr As String)
Dim tr As TextReader = New StringReader(xmlStr)
Dim xdoc As XDocument = XDocument.Load(tr)
Dim query = From rss In xdoc.Descendants("dsSumSv") _
Select vIndex = rss.Elements("Nr").Value, _
vTagName = rss.Elements("TagName").Value, _
vAddr = rss.Elements("Addr").Value, _
vDscpt = rss.Elements("Comment").Value, _
vBitOffset = rss.Elements("BitOffset").Value, _
vUnitCap = rss.Elements("UnitCap").Value, _
vType = rss.Elements("cType").Value, _
vFormat = rss.Elements("Format").Value
For Each xtem In query
mSumSv.Insert(xtem.vIndex, New SumCell(xtem.vIndex, xtem.vAddr, xtem.vBitOffset, xtem.vDscpt, _
xtem.vUnitCap, xtem.vType, xtem.vFormat))
Next
End Sub