Removing Duplicates from List Collection

-
Sounds really simple to pull duplicates out of a list ... MS handled this with a function in VS 3.5 but in earlier versions we had to come up with our own solution.
 

Dim i As Integer
Dim lastapprover As String = String.Empty
Dim iIndex As Integer
iIndex = bulletApprovers.Items.Count

For i = 0 To bulletApprovers.Items.Count - 1
While iIndex > 0
          If bulletApprovers.Items(i).Text = lastapprover Then
               lastapprover = bulletApprovers.Items(iIndex).Text
               bulletApprovers.Items.RemoveAt(iIndex)
Else
              lastapprover = bulletApprovers.Items(iIndex - 1).Text
End If      
           iIndex = iIndex - 1
End While

Next

Comments

Post a Comment

Popular posts from this blog

Linq Exclude from separate list

-
 var urlList = new List<DisplayAssets>();    var assetsToExclude = (from a in db.DisplayAssets                 join h in db.Hardware_Assets on a.id equals h.displayId                 where h.assetId == hardwareid                 select a.id); var allAssets = db.DisplayAssets; var urls = allAssets.Where(x => !assetsToExclude.Contains(x.id));         urlList = urls.Select(a => new DisplayAssets()         {             locaterAddress  = a.locaterAddress,             assetType = a.assetType,             id = a.id         })         .ToList();
Read more

Sorting Ascending and Descending

-
Toggling the direction of your datagrid sort is easy using a session to remember which direction you sorted last.   You will want to declare an empty string in the top of your page       Dim SortField As String Then on your sort command add this logic - Example of entire command Private Sub dgTaskExceptions_SortCommand( ByVal source As Object , ByVal e As System.Web.UI.WebControls.DataGridSortCommandEventArgs) Handles dgTaskExceptions.SortCommand     SortField = e.SortExpression If Session( "toggle" ) = True Then SortField += " DESC" Session( "toggle" ) = False Else SortField += " Asc" Session( "toggle" ) = True End If Dim orderstring As String = SortField 'REBIND dgTaskExceptions.DataSource = POTracking_Data.tracking.getSampleTasks(orderstring) dgTaskExceptions.DataBind() End Sub   In my datalayer I add this logic to my query and pass in an OPTIONAL value Dim orderbyString As String = String .Empt
Read more

Linq Query Syntax vs Method Syntax

-
Referenced from MSDN: https://msdn.microsoft.com/en-us/library/bb397947.aspx Query syntax: IEnumerable<int> numQuery1 =               from num in numbers             where num % 2 == 0             orderby num             select num; Method syntax:         IEnumerable<int> numQuery2 = numbers.Where(num => num % 2 == 0).OrderBy(n => n)
Read more