Imports System.Data.SQLite

Public Class DB

    Public Shared Function getConnection() As SQLiteConnection
        Dim csb As New SQLiteConnectionStringBuilder
        With csb
            .DataSource = $"{Application.StartupPath}\database.db"
            .Version = 3
        End With
        Return New SQLiteConnection(csb.ConnectionString, True)
    End Function

End Class