CheckBox1.Checked = False listview.Enabled = True Dim tmp Dim check As String Dim i Dim X For X = 0 To listview.Items.Count - 1 listview.Items(X).Checked = False Next tmp = combobox.Text.Split("/") check = "select accessid,forms as checkform from userform_tab where accessid='" & (tmp(0)) & "'" CLSCONN = New C_connection CLSCONN.ACCESS_INDREC(check) With CLSCONN.ds End With For i = 1 To listview.Items.Count If String.Compare("your Comapre String1", "your Comapre String2") = 0 Then listview.Items(i).Checked = True End If Next
For i = 1 To ListView.Items.Count If String.Compare(Convert.ToString("your Comapre String1").ToLower(), Convert.ToString("your Comapre String2").ToLower()) = 0 Then ListView.Items(i).Checked = True End If Next
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)