[.NET] 用VB2008讀Excel的資料
請輸入專案類型(網站專案或者應用程式專案): 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)
推
11/21 22:44, , 1F
11/21 22:44, 1F
→
11/21 23:14, , 2F
11/21 23:14, 2F
→
11/21 23:41, , 3F
11/21 23:41, 3F
→
11/21 23:42, , 4F
11/21 23:42, 4F
推
11/22 10:10, , 5F
11/22 10:10, 5F
→
11/22 12:12, , 6F
11/22 12:12, 6F
→
11/22 12:12, , 7F
11/22 12:12, 7F
→
11/22 12:13, , 8F
11/22 12:13, 8F
→
11/22 12:17, , 9F
11/22 12:17, 9F
推
11/23 21:38, , 10F
11/23 21:38, 10F
※ 編輯: WayneNix 來自: 114.26.122.155 (12/26 21:55)