Подсчет выбранных элементов в ListBox и их общего количества - VB
Формулировка задачи:
Здравствуйте! Пишу программу,которая выводит количество шрифтов в виндовсе!
Вывод шрифтов написал..все получается (использовал ЛистБокс)!
Но нужно под лист боксом вывести строку с количеством выбранных шрифтов и сколько их в целом! (Например: 5 из 236)
как это сделать?
Решение задачи: «Подсчет выбранных элементов в ListBox и их общего количества»
textual
Листинг программы
Private Sub List1_Click() Dim i%, c% For i = 0 To List1.ListCount - 1 c = c - List1.Selected(i) Next i Label1 = c & " из " & List1.ListCount End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д