因為Excel表的左上角的單元格都是以第一行第一列
創新互聯建站-專業網站定制、快速模板網站建設、高性價比繁昌網站開發、企業建站全套包干低至880元,成熟完善的模板庫,直接使用。一站式繁昌網站制作公司更省心,省錢,快速模板網站建設找我們,業務覆蓋繁昌地區。費用合理售后完善,十年實體公司更值得信賴。
MsgBox(LBound(arr, 1)) '一維最小下標
MsgBox(LBound(arr, 2)) '二維最小下標
測試:用上面函數(LBound)得到的結果都是1
你可以從數據庫中讀出該字段的記錄,也可以把datagridview中該字段的信息放到textbox中啊,只要判斷是第幾行,第幾列就可以了
你可以使用
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
當前題目:關于vb.net讀寫excel的信息
本文網址:http://vcdvsql.cn/article8/ddcseip.html
成都網站建設公司_創新互聯,為您提供軟件開發、用戶體驗、網站改版、小程序開發、品牌網站設計、建站公司
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯