Crear una aplicacion portable con VB.NET y sqlite

01.- Crear una aplicacion portable con VB.NET y sqlite ?

Crear%2Buna%2Baplicacion%2Bportable%2Bcon%2BVB.NET%2By%2Bsqlite

Click en tools -> Extension Manager
2018 09 08%2B21 21 54 Start%2BPage%2B %2BMicrosoft%2BVisual%2BStudio

En el area de busqueda  colocamos nuget y despues click en download y reiniciamos vstudio
2018 09 09%2B16 05 49 Start%2BPage%2B %2BMicrosoft%2BVisual%2BStudio

Click en nuevo proyecto
2018 09 09%2B14 11 00 Start%2BPage%2B %2BMicrosoft%2BVisual%2BStudio

Seleccionamos .Net Framework 3.5 despues vb froms, colocamos el nombre del proyecto y click en ok
2018 09 15%2B10 48 30 sqlite2%2B %2BMicrosoft%2BVisual%2BStudio

Click en guardar todo y save

2018 09 11%2B23 42 19 sqlite3%2B %2BMicrosoft%2BVisual%2BStudio
Seleccionar tools -> Nuget Package Manager -> Manage Nuget Package for solution
2018 09 09%2B16 35 56 twiliovb%2B %2BMicrosoft%2BVisual%2BStudio
Buscamos sqlite y hacemos click en install

2018 09 11%2B23 47 28 sqlite3%2B %2BMicrosoft%2BVisual%2BStudio

Agregamos un datagrid al form y hacemos doble click en el from para cargar el form_load
2018 09 11%2B23 44 09 sqlite3%2B %2BMicrosoft%2BVisual%2BStudio

Colocamos el siguiente codigo

Imports System.Data.SQLite

Public Class Form1
    Dim conn As New SQLiteConnection("Data Source=data.db;Version=3;UseUTF8Encoding=True;")
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        conn.Open()
        Dim sql As String = "select id,nombre,direccion  from personal"
        Dim da As New SQLiteDataAdapter(sql, conn)
        Dim t As New Data.DataTable
        da.Fill(t)
        conn.Close()
        Me.DataGridView1.DataSource = t
    End Sub
End Class

Creamos esta bd en sqlite llamada data.db

PRAGMA foreign_keys = OFF;
CREATE TABLE "personal" (
"id"  INTEGER PRIMARY KEY AUTOINCREMENT,
"nombre"  TEXT,
"direccion"  TEXT
);
INSERT INTO "main"."personal" VALUES (1, 'eugenio', 'mexico');

Deja un comentario

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *