Страница: 1 |
Как пронумеровать элементы в Лист Боксе? Например: 1. Russia 2. Japan 3. China 4. Chukotka
Dim num As Long Private Sub Form_Load() num = o End Sub Private Sub Command1_Click() num = num + 1 List1.AddItem num & ". " & Text1.Text End Sub Можно так. Когда List1.Clear делаешь, то num = 0 Когда Удалять будешь элемент, тто num = num - 1 Вроде всё... Bratok ListIndex не может быть больше Integer Для удаления есть RemoveItem(ListIndex) Ну извините, если в чём то ошибся, но у меня работало... Страница: 1 |
Вопрос: Вопрос По Лист Боксу
Добавлено: 31.03.03 19:27
Автор вопроса: USER
Ответы
Всего ответов: 3
Номер ответа: 1
Автор ответа:
Bratok
ICQ: 5585601
Вопросов: 0
Ответов: 15
Профиль | | #1
Добавлено: 31.03.03 19:47
Номер ответа: 2
Автор ответа:
Алексей
black admin
ICQ: 261779681
Вопросов: 87
Ответов: 633
Web-сайт:
Профиль | | #2
Добавлено: 01.04.03 10:48
Номер ответа: 3
Автор ответа:
Bratok
ICQ: 5585601
Вопросов: 0
Ответов: 15
Профиль | | #3
Добавлено: 03.04.03 18:48