ค้นหา แสดงในลิสวิวมันซ้ำกัน ชวยดูหน่อยคับ ListViewItem , ListView

 For j As Integer = 0 To ListView1.Items.Count - 1
            If ListView1.Items(j).SubItems(0).Text Then
                Exit Sub
            End If
        Next

        Dim no As Integer = 0
        Dim n As Integer = ds.Tables("FindRoll").Rows.Count
        For i As Integer = 0 To n - 1
            With ds.Tables("FindRoll").Rows(i)

                

                Dim lv As New ListViewItem
                lv.UseItemStyleForSubItems = False
                no = no + 1
                lv.Text = no
                lv.SubItems.Add(.Item("RolCol_Id").ToString)
                lv.SubItems.Add(.Item("Roll_Name").ToString)
                lv.SubItems.Add(.Item("Roll_size").ToString)
                lv.SubItems.Add(.Item("Roll_unit").ToString)
                lv.SubItems.Add(.Item("Roll_Cat").ToString)
                lv.SubItems.Add(.Item("RollRe_Quantity").ToString)
                lv.SubItems.Add(.Item("RollRe_unit").ToString)
                lv.SubItems.Add(.Item("RollRe_Sum").ToString)
                lv.SubItems.Add(.Item("Roll_amount").ToString)
                lv.SubItems.Add(.Item("Roll_Receivable").ToString)
                lv.SubItems.Add(.Item("Roll_cancel").ToString)
                lv.SubItems.Add(.Item("Roll_sum").ToString)


                ListView1.Items.Add(lv)
                lv = Nothing
            End With
        Next