Создание групп в ListView (ListViewGroup)

Как я уже говорил несколько раз, управление списка является одним из самых использования при разработке приложений в Visual Basic. NET.

Сегодня я хочу показать способ получить больше от этого контроля, а также оставить гораздо более привлекательными, создавая группы и использование фонового изображения.

Например нам нужно: форма и списка. Должно выглядеть как на рисунке ниже:

Для отображения результатов нам нужны данные, а для этого я создал DataTable в памяти, и наполнил ее четыре записи. Поля Имя, Фамилия, телефон и место.

Я хочу показать в этом примере список людей, с их именами и телефонами сгруппированы по месту расположения. Первый анализ следующий код, если вы хотите попробовать, чтобы увидеть, как она работает, и тогда я расскажу несколько вещей.

 Dim DT As New DataTable
 dt.Columns.Add ("Name")
 dt.Columns.Add ("Name")
 dt.Columns.Add ("Телефон")
 dt.Columns.Add ("Город")

 Dim др. В DataRow = dt.NewRow

 д-р ("Name") = "John"
 д-р ("Name") = "Smith"
 д-р ("Телефон") = "4587-9546"
 д-р ("Location") = "Морон"
 dt.Rows.Add (DR)

 д-р = dt.NewRow
 д-р ("Name") = "Марсело"
 д-р ("Name") = "Роланд"
 д-р ("Телефон") = "7415-8945"
 д-р ("Location") = "Морон"
 dt.Rows.Add (DR)

 д-р = dt.NewRow

 д-р ("Name") = "Хавьер"
 д-р ("Name") = "Мартинес"
 д-р ("Телефон") = "4567-9654"
 д-р ("Location") = "Castelar"
 dt.Rows.Add (DR)

 д-р = dt.NewRow

 д-р ("Name") = "Эстеван"
 д-р ("Name") = "Васкес"
 д-р ("Телефон") = "9452-4515"
 д-р ("Location") = "Castelar"
 dt.Rows.Add (DR)

 ListView1.FullRowSelect = True
 ListView1.MultiSelect = False

 Dim As String = grupoActual String.Empty

 Dim г в качестве новой ListViewGroup

 Для каждого г как DataRow в dt.Rows

 Если г ("Город"). ToString <> Затем grupoActual
 Новые ListViewGroup г = (г ("Город"). ToString)
 grupoActual = г ("Город"). ToString
 ListView1.Groups.Add (г)
 End If

 Dim элемент в качестве новой ListViewItem ("")
 item.SubItems.Add (г ("Name"). ToString)
 item.SubItems.Add (Г ("Last Name"). ToString)
 item.SubItems.Add (г («Телефон»). ToString)
 item.Group = г

 ListView1.Items.Add (пункт)
 Следующий

Ну, первые строчки относятся к созданию DataTable и заполнение данных и не буду комментировать. Сконцентрируйтесь на том, как заполнить списка.

Сначала создайте для каждого цикла по всем записям в таблице у меня в памяти. Затем я создаю текстовый переменной (grupoActual), чтобы сохранить имя группы (последнее, что я добавил списка), и я также думаю, что объект ListViewGroup (г). Первое, что мне делать, чтобы встать на учет является назначение участка (который лежит в сфере я хочу работать в группе) ListView1 и сохранить эти данные в переменной grupoActual для будущих сравнений. Затем взимать ListViewItem как всегда в отличие от отметил, что этот пункт относится к группе "G", добавил пункт ListView1 и готово. Проходя через другие документы и выполнять сравнение только создать новую группу при изменении города.

Результат будет выглядеть так:

Теперь все выглядит лучше, я рекомендую создать изображение для фона. Я думаю, что я упоминал, что я предпочитаю Photoshop, но вы можете использовать любой графический редактор для создания JPG для использования в фоновом режиме. Обратите внимание, что цвета не должны быть очень сильными, потому что это difilcultará чтения данных.

Здесь я оставляю образ, который я использую в этом примере:

Чтобы его использовать, просто из свойств списка, найти BackgroundImage и добавьте изображение, как показано ниже:

и вы также должны изменить свойство Правда и готовы BackgroundImageTiled. Я покажу конечный результат:

Вот это, я надеюсь, что они служат.