作者WayneNix (酷丝瓜)
看板Visual_Basic
标题[.NET] 用VB2008读Excel的资料
时间Sun Nov 21 21:29:46 2010
请输入专案类型(网站专案或者应用程式专案): VB2005 Express
小弟我看了以下的网页
http://www.cnblogs.com/oomusou/archive/2009/09/30/vb6_read_write_excel.html
用VB2008依样画葫芦=>
3.使用ADO的方式读取excel档,并使用databinding
我的form上面放了一个Button,DataGridView和BindingSource,
执行Button完毕之後,DataGridView并没有反应,Button执行程式码如下:
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim t1, t2, t As Date
t1 = Now
cn.Open("Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=E:\sample.xls;" & _
"Extended Properties=""Excel 8.0;""")
cn.CursorLocation = ADODB.CursorLocationEnum.adUseClient
rs.Open("SELECT * FROM [Sheet1$A1:C10002]", cn)
DataGridView1.DataSource = rs
DataGridView1.Refresh()
t2 = Now
't = t2 - t1 ' <<==错误:
型别 'System.TimeSpan' 的值无法转换成 'Date'。
'MsgBox(Second(t))
能否指点一下是哪边出了问题,感恩!
--
※ 发信站: 批踢踢实业坊(ptt.cc)
※ 编辑: WayneNix 来自: 114.26.129.1 (11/21 21:40)
1F:推 Marty:Dim t as TimeSpan 11/21 22:44
2F:→ MOONRAKER:时刻减时刻会得到时距,你写.NET自己要记得。 11/21 23:14
3F:→ WayneNix:问一个笨问题,请问t的TimeSpan和开启Excel到DataGridView 11/21 23:41
4F:→ WayneNix:有关联吗?总感觉少了什麽东西(Dataset?) 11/21 23:42
5F:推 Marty:程式中的t看起来是测花了多久读资料库 程式不是你写的吗?? 11/22 10:10
6F:→ WayneNix:小弟不才,我是照上述网址用VB2008写的,网址用VB6写 11/22 12:12
7F:→ WayneNix:其实可以算都照网址所写,我纳闷的是无法在DataGridView 11/22 12:12
8F:→ WayneNix:显示出来我的Excel档案 11/22 12:13
9F:→ WayneNix:这个是否和TimeSpan有关系? 11/22 12:17
10F:推 Marty:没有关系 11/23 21:38
※ 编辑: WayneNix 来自: 114.26.122.155 (12/26 21:55)