problem about for each loop

 hi, i got a value which is store in the array and i need to compare it
which
if my user = 1,2,3,4,5,6 then ignore
if my user = 2,3,4,5,6 then i need to add in a ,1 which become 2,3,4,5,6,1

here is my coding

If dr.Read Then user = dr("user_access") dr.Close() Dim splitX As String() = user.Split(","c) For Each item As String In splitX If item = "1" Then Label1.Text = user Else Label1.Text = user & ",1" End If Next End If
is there other way to compare the array or there is another better way to check?

...