Question

求助！怎样把Excel表格里的数据导入VB编程的access数据库里

是这样的，我的毕业设计要编程设计一个地图分析软件。
功能是把Excel表格中的数据（电动车运营数据）导入到我的程序中，再通过程序的算法进行数据分析，并且能够在地图上显示出位置信息。
目前已经将地图（百度地图API，JS）载入到VB程序中，但是在把Excel表格中的数据导入到程序中出现了问题，由于不是计算机或者软件专业的，对于编程只是初学者，请高手指点，最好有代码和流程图，谢谢！
所用的开发平台是visual studio 2013 for windows desktop

Answer 1

从excel读取数据，写入mdb数据库中

F1=server.mappath("userdata/"&xlsfile) 'EXCEL 文件路径

Set xlApp = server.CreateObject("Excel.Application")
Set xlbook = xlApp.Workbooks.Open(F1)
Set xlsheet = xlbook.Worksheets(1)

nLine=100 '行数

i=startline

set rs=server.createobject("adodb.recordset")
rs.open "Select * from [jinzhan]",conn,1,3

Do While I<nLine

s1=trim(xlsheet.Cells(i, 1)) '第I行第一列

rs.addnew

rs("s1")=s1

rs.update

i=i+1

loop

set xlsheet=nothing
set xlbook=nothing
xlApp.quit

rs.close
set rs=Nothing
Conn.close
set Conn=Nothing