VS 2019 UPDATE Query Throws error "Database is locked". help!

Using connection_1 As New SQLiteConnection("Data Source=C:\WinMiniSuper\DB2\MiniSuper.db;Version=3;")
            If (connection_1.State = ConnectionState.Closed) Then connection_1.Open()
            Dim ID_Scalar As Integer = 0
            Using Command1 As New SQLiteCommand("SELECT ID_ FROM Brand_Table WHERE Name = '" & ComboBox1.Text & "'", connection_1)
                ID_Scalar = Convert.ToInt32(Command1.ExecuteScalar())
            End Using
            Using Command2 As New SQLiteCommand("UPDATE Brand_Table SET Name = @TB1 WHERE ID_ = '" & ID_Scalar & "'", connection_1)
                Command2.Parameters.AddWithValue("@TB1", TextBox1.Text)
                Command2.ExecuteNonQuery()
            End Using
        End Using