SQLite Add new record vb.net

 Public Sub AddNewData()
        Dim con As New SQLiteConnection
 
        Try
            con.ConnectionString = My.Settings.ConnectionString
            con.Open()
 
            'Create a new SQL command
            Dim cmd As SQLiteCommand = con.CreateCommand()
 
            'Add Items in the table
            Dim sql As String = "INSERT INTO TableName(Item1,Item2,Item3) VALUES('111','222','ccc')"
 
            'Setup and execute the command SQL to create a new table
            cmd.CommandText = sql
            cmd.ExecuteNonQuery()
        Catch ex As Exception
            Console.WriteLine(ex.Message)
        Finally
            'Cleanup and close the connection
            If Not IsNothing(con) Then con.Close()
        End Try
 
    End Sub