для каждого цикла listview

-1

Я пытаюсь понять, как написать a для каждого утверждения, чтобы это продолжало циклически искать всех пользователей, так как прямо сейчас он находит только первого пользователя. Любая помощь будет оценена. Спасибо!для каждого цикла listview

Dim item As New ListViewItem 
item = New ListViewItem 
Dim itm As New ListViewItem(objRecordSet.Fields("sAMAccountName").Value().ToString) 
itm.SubItems.Add(objRecordSet.Fields("givenName").Value().ToString) 
itm.SubItems.Add(objRecordSet.Fields("SN").Value().ToString) 
ListView1.Items.Add(itm)

источник

2014-09-24 John Dooley

нет петли там и нет никакого кода, чтобы найти что-нибудь; он просто добавляет LVI, поэтому неясно, что может быть неправильным; вы спрашиваете, как зацикливать на наборе записей, чтобы добавить несколько элементов? – Plutonix

да, вот что я прошу. Мне жаль, что я не был чист. Я пытаюсь зациклиться на наборе записей, чтобы добавить в список больше элементов. Я искал в Интернете и ничего не пробовал работать, поэтому я предполагаю, что делаю это неправильно. –

Вот код для выполнения этой задачи вы просите (не тестировался)

If Not (objRecordSet.EOF And objRecordSet.BOF) Then 
    objRecordSet.MoveFirst 
    While Not objRecordSet.EOF 
     Dim itm As New ListViewItem(objRecordSet.Fields("sAMAccountName").Value().ToString) 
     itm.SubItems.Add(objRecordSet.Fields("givenName").Value().ToString) 
     itm.SubItems.Add(objRecordSet.Fields("SN").Value().ToString) 
     ListView1.Items.Add(itm) 
     objRecordSet.MoveNext 
    Wend 
End If

источник

2014-09-24 13:46:26 George

Спасибо! Отлично работает –

ответ

Смежные вопросы