</startup>
然后:
Dim SQLconnect As New SQLite.SQLiteConnection()
? ? ? ? Dim SQLcommand As SQLiteCommand? ? ? ? SQLconnect.ConnectionString = "Data Source=:memory:;Version=3;New=true"? ? ? ? SQLconnect.Open()? ? ? ? SQLcommand = SQLconnect.CreateCommand? ? ? ? SQLcommand.CommandText = "CREATE TABLE foo(title TEXT, description TEXT)"? ? ? ? SQLcommand.ExecuteNonQuery()? ? ? ? SQLcommand.CommandText = "INSERT INTO foo (title, description) VALUES ('This is a title', 'This is a Description')"? ? ? ? SQLcommand.ExecuteNonQuery()? ? ? ? SQLcommand.CommandText = "SELECT * FROM foo"? ? ? ? Dim SQLreader As SQLiteDataReader = SQLcommand.ExecuteReader()? ? ? ? While SQLreader.Read()? ? ? ? ? ? MessageBox.Show(SQLreader.Item(0).ToString)? ? ? ? End While? ? ? ? SQLcommand.Dispose()? ? ? ? SQLconnect.Close()转载于:https://www.cnblogs.com/hzb2001/archive/2011/06/08/2075505.html
【说明】:本文章由站长整理发布,文章内容不代表本站观点,如文中有侵权行为,请与本站客服联系(QQ:254677821)!