listview and checkbox

[sal21]

i'm on vb 6.0

I need to permit to the user to check only a checkbox,"one by one", and not permit to use a multiselect checkbox, possible?

Similar oprtion button.

[HansV]

Create an event procedure for the ItemCheck event of the listview:

Code: Select all

Private Sub ListView1_ItemCheck(ByVal Item As MSComctlLib.ListItem)
    Static LastChecked As ListItem
    If Item.Checked Then
        If Not LastChecked Is Nothing Then
            LastChecked.Checked = False
        End If
        Set LastChecked = Item
    End If
End Sub

[sal21]

Create an event procedure for the ItemCheck event of the listview:

Code: Select all

Private Sub ListView1_ItemCheck(ByVal Item As MSComctlLib.ListItem)
    Static LastChecked As ListItem
    If Item.Checked Then
        If Not LastChecked Is Nothing Then
            LastChecked.Checked = False
        End If
        Set LastChecked = Item
    End If
End Sub

I have no words!!!!

Work perfect!
Tks bro