SQLite3 conectando a VB2008, no me resulta

[tazzwt]

SQLite3 conectando a VB2008, no me resulta

Lo unico que quiero lograr es una conexion, con SQLite3, eh intentando un monton de veces pero no resulta para nada.

Código VB2008:

Imports System
Imports System.Data
Imports System.Data.SQLite
Imports System.Data.SQLite.SQLiteConnection
Imports System.Data.SQLite.SQLiteCommand
Imports System.Data.SQLite.SQLiteTransaction
Imports System.Data.SQLite.SQLiteDataReader
 
Public Class Form1
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
 
        Dim cnn As New SQLiteConnection("Data Source=mibase.db;Version=3;")
 
        cnn.Open()
 
        MsgBox("Conexión Realizada")
 
        cnn.Close()
 
    End Sub
End Class
 

ó tambien

Código VB2008:

Imports System
Imports System.Data
Imports System.Data.SQLite
Imports System.Data.SQLite.SQLiteConnection
Imports System.Data.SQLite.SQLiteCommand
Imports System.Data.SQLite.SQLiteTransaction
Imports System.Data.SQLite.SQLiteDataReader
 
Public Class Form1
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
 
        Dim SQLconnect As New SQLiteConnection()
 
        SQLconnect.ConnectionString = "Data Source=mibase.db;Version=3;"
 
        SQLconnect.Open()
 
        MsgBox("Conexión Realizada")
 
        SQLconnect.Close()
    End Sub
End Class