關(guān)于VB.net中讀取Excel數(shù)據(jù)存入數(shù)組后的再讀取問題

因為Excel表的左上角的單元格都是以第一行第一列

創(chuàng)新互聯(lián)建站-專業(yè)網(wǎng)站定制、快速模板網(wǎng)站建設(shè)、高性價比繁昌網(wǎng)站開發(fā)、企業(yè)建站全套包干低至880元,成熟完善的模板庫,直接使用。一站式繁昌網(wǎng)站制作公司更省心,省錢,快速模板網(wǎng)站建設(shè)找我們，業(yè)務(wù)覆蓋繁昌地區(qū)。費用合理售后完善，十年實體公司更值得信賴。

MsgBox(LBound(arr, 1)) '一維最小下標(biāo)

MsgBox(LBound(arr, 2)) '二維最小下標(biāo)

測試：用上面函數(shù)（LBound）得到的結(jié)果都是1

求程序：vb.net讀取excel，插入access，然后查詢，再寫入另一excel

你可以從數(shù)據(jù)庫中讀出該字段的記錄，也可以把datagridview中該字段的信息放到textbox中啊，只要判斷是第幾行，第幾列就可以了

VB.net（VS2010）讀寫Excel2010

你可以使用

Private?Sub?Form_Load()

Dim?a?As?Object

Dim?b?As?Object

Dim?c?As?Object

Set?a?=?GetObject(,?"Excel.Application")

Set?b?=?a.WorkBooks.open(Path??"\工作簿1.xlsx")

a.Visible?=?False

Set?c?=?b.worksheets(1)

End?Sub

要引用：microsoft?activex?data?objects?2.5?library

Private?Sub?Form_Load()

Dim?cnn?As?ADODB.Connection

Set?cnn?=?New?ADODB.Connection

cnn.Open?"Provider=MSDASQL.1;Persist?Security?Info=False;Extended?Properties=""DSN=Excel?Files;DBQ="??App.Path??"\Book1.xlsx;DriverId=1046;FIL=excel?8.0"""

Dim?rs?As?ADODB.Recordset

Set?rs?=?New?ADODB.Recordset

rs.Open?"select?*?from?[sheet1$]",?cnn

Set?Me.MSHFlexGrid1.DataSource?=?rs

End?Sub