Me._adapter.UpdateCommand = New System.Data.SqlClient.SqlCommand
            Me._adapter.UpdateCommand.Connection = Me.Connection
            Me._adapter.UpdateCommand.CommandText = "UPDATE [dbo].[DVDs] SET" & _
              "[ID] = @ID, [Title] = @Title, [Description] = @Descriptio" & _
                "n, [Actors] = @Actors, [Director] = @Director, [Genre] =" & _
                "@Genre, [Length] = @Len" & _
..
..
  Me._adapter.UpdateCommand.CommandType = System.Data.CommandType.Text