ListView1.View = View.Details
        ListView1.Columns.Add("one")
        ListView1.HeaderStyle = ColumnHeaderStyle.None
        ListView1.CheckBoxes = True
 
        Dim rnd As New Random
 
        For nIDx As Integer = 0 To 100
            Dim lstItem As New ListViewItem
            lstItem.BackColor = Color.FromArgb(rnd.Next(1, 255), rnd.Next(1, _
              255), rnd.Next(1, 255))
            lstItem.Text = nIDx
            ListView1.Items.Add(lstItem)
        Next
 
        ListView1.Columns(0).Width = -2
        ListView1.Columns(0).Width -= 2