■■■VB.NetでSQLite■■■

VB.NetでSQLiteを使ってみます。
DBはツール等で先に作ってしまうと良いと思います
DBをD:\SQLite\test.dbに作成し、testtableを作ったとします。
testtableはid,data1,data2と言う項目を作成し、データを何件か入れておきます。
VB.Netによるアクセスは以下のようになります。
------------------------------------------------------------------------

Imports System.Data.SQLite
Public Class Form1

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        '接続文字列を設定
        Dim Connection As New SQLiteConnection
        Dim Command As SQLiteCommand
        Dim DataReader As SQLiteDataReader

        Connection.ConnectionString = "Version=3;Data Source=D:\SQLite\test.db;New=False;Compress=True;"

        ''パスワードをセット
        'Connection.SetPassword("password")

        'オープン
        Connection.Open()
        ''パスワードを変更
        'Connection.ChangePassword("password")

        'コマンド作成
        Command = Connection.CreateCommand

        'SQL作成
        Command.CommandText = "SELECT * FROM testtable"

        'データリーダーにデータ取得
        DataReader = Command.ExecuteReader

        'データを全件出力
        Do Until Not DataReader.Read
            Debug.Print(DataReader.Item("id").ToString)
            Debug.Print(DataReader.Item("data1").ToString)
            Debug.Print(DataReader.Item("data2").ToString)
        Loop

        '破棄
        DataReader.Close()
        Command.Dispose()
        Connection.Close()
        Connection.Dispose()

    End Sub
End Class