Public Sub UpdateData() 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 = String.Format("UPDATE TableName SET Item1='bbb', Item2='ccc',Item3='xxx' WHERE Item1='111'") 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