Dim checkSel As Boolean = FalseFor i As Integer = 0 To ListView1.Items.Count - 1 If ListView1.Items(i).Selected = True Then checkSel = True End IfNextIf checkSel = False Then Button1.Enable=FalseEnd If