求程序:vb.net读取excel,插入access,然后查询,再写入另一excel

业务要求:
1.在vb.net编写的窗口中,点击按钮,在文件管理器中分别选择读取对象文件夹(包含多个excel)和写入对象excel,点击“确定”进入后台操作
2.在后台,利用vb.net,对选定的文件夹中的多个excel循环进行编辑(该excel行数不定,列数一定),如B列内容进行拆分,然后将其与C,D列内容写入access
3.通过sql文的不同where条件(如C列内容为1),将access内容取出
4.将取出结果写入指定的excel的指定sheet的指定位置

程序要求:
1.作为sample,只要实现以上业务要求即可。
2.要求程序模块化,比如至少分为几个class:读取excel,插入access,写入excel
(因为以后业务要扩展,所以必须模块化)
3.主要函数有简单注释

另:本人对vb.net不熟,但有一定java编程基础,有些问题如果调查不清楚,以后还需要再请教(即:可提供一定的技术支持。)

请将sample程序发到邮箱:nvforgetu@163.com
起薪50财富~~求高手
要求较多,所以时间也比较宽裕,2周时间(4/25截止)

4/22自己解决了,其实真的不难.看来是我低估了自己,高估了别人.闪了~~

第1个回答  2020-01-28
你可以从数据库中读出该字段的记录,也可以把datagridview中该字段的信息放到textbox中啊,只要判断是第几行,第几列就可以了
第2个回答  2011-04-11
...
I 服了 you
如果没有200财富,很难找到人吧。
我自己写了一个excel读取的,直接写入datagridview都很难了..
你还要插入access...

如果你自己用Java写,没个几天写的出来吗?
你现在这个问题如果我写+一些参考(不保证写的出),我一定要个几天,没办法,技术不高。追问

呵呵,没说今天就要。
知道要花费几天时间,我补充上:时限:2周时间

至于悬赏,呵呵,我说了起薪50,我一开始定500,结果都是灌水的,到时候还不是便宜了他们?
不怕给不起,就怕瞎掺合
你说是不?

追答

其实我觉得要找到完整的会比较难,反正你有java 基础,vb.net是最简单的语言。
如果你要写出,2个礼拜应该写的出来,我自己都不敢保证我能写的出,因为蛮复杂的。

幸好我老板没叫我写出来= =
不然到我头疼了。

追问

呵呵,是呀是呀,我已经开始编写了,现在已经进行到1/3了,当然,需求上有些变化。
这个提问的主要目的就是看看有没有人有现成的,呵呵,偷懒心理~~

其实没那么复杂,真的。
当然了,要完全弄懂还是要花费点时间的

追答

呵呵,如果需要帮忙就说一声吧。
因为我都是用控件,例如excel导出,自己写的效率都没有控件来的高。
加油哦

本回答被提问者采纳
第3个回答  2011-04-20
学习了

关于VB.net中读取Excel数据存入数组后的再读取问题
因为Excel表的左上角的单元格都是以第一行第一列 MsgBox(LBound(arr, 1)) '一维最小下标 MsgBox(LBound(arr, 2)) '二维最小下标 测试:用上面函数(LBound)得到的结果都是1

vb.net怎么访问excel表格
1.在工程中引用Microsoft Excel 12.0 Object Library 2、在通用对象的声明过程中定义EXCEL对象:Dim xlApp As Excel.Application Dim xlBook As Excel.WorkBook Dim xlSheet As Excel.Worksheet 3、在程序中操作VB.NET EXCEL常用命令:Set xlApp = CreateObject("Excel.Application") '创建EXCEL对象 Se...

vb调用access数据库,并将查询内容写入excel表中
'这段程序可以放到Word的模块中进行调试。CreateReport Sub CreateReport()On Error Resume Next KillExcel Set vCnn = CreateObject("ADODB.Connection")Set vrs = CreateObject("ADODB.Recordset")Set xlApp = CreateObject("Excel.Application")Set xlBook = CreateObject("Excel.Workbook")xlApp.Visibl...

excel中如何直接调用access数据excelvb调用access数据库
1. 打开Excel,选择"数据"选项卡,点击"获取外部数据"按钮,选择"从其他源"。2. 在"数据获取和转换向导"窗口中,选择"Microsoft Access"作为数据源,然后点击"下一步"按钮。3. 在"选择数据源"对话框中,浏览并选择Access数据库文件,然后点击"下一步"按钮。4. 在"选择您的数据"对话框中,选择要...

vb+access,怎样将某表中一列复制到另一表中
老套路啊,就是在vb中通过adodb连接到access,然后读取其中一张表的数据到内存,然后插入另外一张表就可以。

VB 把多个Excel表批量导入access数据库怎样做?
文件流呗,先把Excel文件都获取(.net的库中有相关函数),然后循环处理(一个Excel文件一个的处理),循环中的处理如下:把Excel中的数据读取保存在datatable中,然后插入到assess数据库。

vb.net怎么把excel 读到DataSet中?
workbook.LoadFromFile("F:\\ExportData.xlsx", ExcelVersion.Version2013)'获取第一张sheet Dim sheet As Worksheet = workbook.Worksheets(0)'设置range范围 Dim range As CellRange = sheet.Range(sheet.FirstRow, sheet.FirstColumn, sheet.LastRow, sheet.LastColumn)'输出数据, 同时输出列名以及公式...

vb.net (2010) 连接access数据库及操作代码 (读取 写入 创建新表...
由于 没有VS2010,只能简单写几句代码。用ODBC连接数据比较方便,你首先要引用system.data和system.data.odbc dim cn as odbcconnection cn=new odbcconnection("driver={microsoft access driver (*.mdb)};uid=admin;pwd=;dbq=数据库路径\\数据库名.mdb")dim tsql as string tsql="select username ...

vb将excel值赋值给access
假设EXCEL与access都已经打开:Set xlSheet = xlBook.Sheets("sheet1")rs.Addnew rs.Fields("字段1").Value = xlSheet.Range("A2")rs.Fields("字段2").Value = xlSheet.Range("B2")rs.Update

用vb.net读取指定单元格的值到变量
Dim prod As String = objimportsheet.Cells(j, i).value '读取单元格的值(i是列,j是行) '释放Excel文件 objworkbook.Close() objworkbook = Nothing objexcelfile.Quit()注意需要添加 Microsoft.Office.Interop 的引用。

相似回答
大家正在搜