Try
Dim conn As New System.Data.SQLite.SQLiteConnection(SqliteStr)
Dim cmd As New SQLiteCommand("SELECT * FROM Jinkou", conn)
conn.Open()
Dim ds As New DataSet()
Dim da As New SQLiteDataAdapter(cmd)
da.Fill(ds) ‘在些處報錯，報formatException
conn.Close()
dg.DataSource = ds
Dim counts As New Integer
counts = dt.Rows.Count()
lbl合計.Text = "共：【" + counts.ToString() + "】條資料"
Catch ex As SqlException
MsgBox(ex.Message)
Catch ex As Exception
MsgBox(ex.Message) ’例外拋到這里
End Try
求各位大神給出解決方案
uj5u.com熱心網友回復：
dt 哪來的？uj5u.com熱心網友回復：
da.Fill(ds)這里直接填充表da.Fill(dt)，主要還是看你取出來的Adapter有沒有問題話說Dim counts As New Integer這樣也行。。。
uj5u.com熱心網友回復：
部分代碼
Dim mSQL As String = "Select * from " & mTableName
mDataAdapter.SelectCommand = New SQLiteCommand(mSQL, SQLiteConn)
mTable = New DataTable
DataGrid1.DataBindings.Clear()
DataGrid1.DataSource = Nothing
DataGrid1.Refresh()
mDataAdapter.Fill(mTable)
DataGrid1.DataSource = mTable
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/103821.html
上一篇：modbus回傳資料決議
下一篇：如何自動下載網上制定資料