要将excel中的数据行读取到VB.NET吗
我想从excel中读取数据 我有18列,行数可能从150到500不等 读取数据后,我想在网格视图中显示它,同时将其插入数据库 我有一个代码,它只能按列读取,实际上这不是我的要求 我要按行要将excel中的数据行读取到VB.NET吗,vb.net,excel,gridview,datatable,dataset,Vb.net,Excel,Gridview,Datatable,Dataset,我想从excel中读取数据 我有18列,行数可能从150到500不等 读取数据后,我想在网格视图中显示它,同时将其插入数据库 我有一个代码,它只能按列读取,实际上这不是我的要求 我要按行 enter code here For rCount = 4 To rCount objValues = CType(exCell(rCount, 1), Excel.Range).Value() If objValues <> No
enter code here
For rCount = 4 To rCount
objValues = CType(exCell(rCount, 1), Excel.Range).Value()
If objValues <> Nothing Then
' dtRecords.Columns.Add(objValues.ToString)
dtRecords.Rows.Add(objValues.ToString)
totalRecords += 1
End If
Exit For
Next
ds.Tables.Add(dtRecords)
If ds.Tables.Count > 0 Then
grvRecords.AutoGenerateColumns = True
grvRecords.DataSource = ds.Tables(0)
End If
在此处输入代码
对于rCount=4到rCount
objValues=CType(exCell(rCount,1),Excel.Range.Value()
如果objvalue为Nothing,则
'dtRecords.Columns.Add(objValues.ToString)
dtRecords.Rows.Add(objValues.ToString)
totalRecords+=1
如果结束
退出
下一个
ds.Tables.Add(dtRecords)
如果ds.Tables.Count>0,则
grvRecords.AutoGenerateColumns=True
grvRecords.DataSource=ds.Tables(0)
如果结束
`如果您熟悉SQL,可以使用ADO.NET从Excel检索数据。
请参阅:不,这不是我的要求,我需要从excel中读取行并将其插入SQl server。在插入时,我将检查这些行是否存在,根据这一点,标志llb返回前端。